home *** CD-ROM | disk | FTP | other *** search
| MacBinary | 1994-09-14 | 162.3 KB | [CrDt/GMS ] |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: MacBinary
(archive/macBinary).
You can browse this item here: 4D Speech Pack
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 10%
| dexvert
| MacBinary (archive/macBinary)
| fallback
| Supported |
| 100%
| file
| MacBinary II, Sat Jun 18 16:30:00 1994, modified Wed Sep 14 18:57:05 1994, creator 'GMS ', type 'CrDt' "4D Speech Pack", at 0x80 165962 bytes resource Apple HFS/HFS+ resource fork, map offset 0x279e3, map length 0xe67, data length 0x278e3, at 16 0x6f206578, nextResourceMap 0x540e18, fileRef 0x1434, list offset 0x1c, name offset 0x722, 4 types, 0x54455854 'TEXT' * 72 resource offset 0x22
| default (weak)
| |
| 99%
| file
| data
| default
| |
| 100%
| TrID
| MacBinary 2
| default (weak)
| |
| 100%
| siegfried
| fmt/1762 MacBinary (II)
| default
| |
| 100%
| lsar
| MacBinary
| default
|
|
| id metadata |
|---|
| key | value |
|---|
| macFileType | [CrDt] |
| macFileCreator | [GMS ] |
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0e 34 44 20 53 70 65 | 65 63 68 20 50 61 63 6b |..4D Spe|ech Pack|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 43 72 44 74 47 4d 53 | 20 00 00 00 00 00 00 00 |.CrDtGMS| .......|
|00000050| 00 00 00 00 00 00 00 00 | 02 88 4a aa 29 09 c8 aa |........|..J.)...|
|00000060| 9d 30 41 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.0A.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 aa c1 00 00 |........|........|
|00000080| 00 00 01 00 00 02 79 e3 | 00 02 78 e3 00 00 0e 67 |......y.|..x....g|
|00000090| 6f 20 65 78 74 65 72 6e | 61 6c 20 70 61 63 6b 61 |o extern|al packa|
|000000a0| 67 65 20 28 66 72 6f 6d | 20 74 68 65 20 73 61 6d |ge (from| the sam|
|000000b0| 0e 34 44 20 53 70 65 65 | 63 68 20 50 61 63 6b 34 |.4D Spee|ch Pack4|
|000000c0| 02 00 00 00 43 72 44 74 | 47 4d 53 20 00 00 00 00 |....CrDt|GMS ....|
|000000d0| 00 00 43 72 44 74 47 4d | 53 20 00 00 00 00 00 00 |..CrDtGM|S ......|
|000000e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000f0| 00 00 aa e5 84 3a 00 00 | 00 00 00 02 88 4a 6f 66 |.....:..|.....Jof|
|00000100| 66 2c 20 74 68 65 20 63 | 6f 6d 70 75 74 65 72 20 |f, the c|omputer |
|00000110| 77 69 6c 6c 20 63 6c 6f | 73 65 20 69 74 73 65 6c |will clo|se itsel|
|00000120| 66 20 64 6f 77 6e 20 61 | 6e 64 20 70 72 65 73 65 |f down a|nd prese|
|00000130| 6e 74 20 61 6e 20 61 6c | 65 72 74 20 74 6f 20 74 |nt an al|ert to t|
|00000140| 68 65 20 75 73 65 72 20 | 77 68 65 6e 20 69 74 20 |he user |when it |
|00000150| 69 73 20 73 61 76 65 20 | 74 6f 20 74 75 72 6e 20 |is save |to turn |
|00000160| 74 68 65 20 63 6f 6d 70 | 75 74 65 72 20 6f 66 66 |the comp|uter off|
|00000170| 2e 0d 42 65 69 6e 67 20 | 61 62 6c 65 20 74 6f 20 |..Being |able to |
|00000180| 00 00 00 16 00 01 00 00 | 00 00 00 0c 00 0a 00 03 |........|........|
|00000190| 00 00 00 09 00 00 00 00 | 00 00 00 00 00 01 20 00 |........|...... .|
|000001a0| 00 00 16 00 01 00 00 00 | 00 00 0c 00 0a 00 03 00 |........|........|
|000001b0| 00 00 09 00 00 00 00 00 | 00 00 00 00 2a 00 02 00 |........|....*...|
|000001c0| 00 00 00 00 0c 00 0a 00 | 03 01 00 00 09 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 15 00 | 0c 00 0a 00 03 00 00 00 |........|........|
|000001e0| 09 00 00 00 00 00 00 00 | 00 00 52 00 04 00 00 00 |........|..R.....|
|000001f0| 00 00 0c 00 0a 00 03 01 | 00 00 09 00 00 00 00 00 |........|........|
|00000200| 00 00 00 00 0c 00 0c 00 | 0a 00 03 00 00 00 09 00 |........|........|
|00000210| 00 00 00 00 00 00 00 01 | 6b 00 0c 00 0a 00 03 01 |........|k.......|
|00000220| 00 00 09 00 00 00 00 00 | 00 00 00 01 76 00 0c 00 |........|....v...|
|00000230| 0a 00 03 00 00 00 09 00 | 00 00 00 00 00 00 00 03 |........|........|
|00000240| 0b 53 75 67 67 65 73 74 | 69 6f 6e 73 0d 0d 59 6f |.Suggest|ions..Yo|
|00000250| 75 20 63 61 6e 20 75 73 | 65 20 53 70 65 65 63 68 |u can us|e Speech|
|00000260| 20 50 61 63 6b 20 74 6f | 20 73 70 65 61 6b 20 61 | Pack to| speak a|
|00000270| 6c 65 72 74 20 74 65 78 | 74 73 20 74 6f 20 74 68 |lert tex|ts to th|
|00000280| 65 20 75 73 65 72 2c 20 | 72 65 61 64 20 6f 75 74 |e user, |read out|
|00000290| 20 61 20 74 65 78 74 20 | 66 69 65 6c 64 20 61 6e | a text |field an|
|000002a0| 64 20 6f 74 68 65 72 20 | 74 68 69 6e 67 73 20 6c |d other |things l|
|000002b0| 69 6b 65 20 74 68 61 74 | 2e 0d 57 68 65 6e 20 75 |ike that|..When u|
|000002c0| 73 69 6e 67 20 34 44 20 | 53 65 72 76 65 72 20 79 |sing 4D |Server y|
|000002d0| 6f 75 20 63 61 6e 20 61 | 6c 73 6f 20 69 6d 70 6c |ou can a|lso impl|
|000002e0| 65 6d 65 6e 74 20 61 20 | 63 68 61 74 2d 73 65 72 |ement a |chat-ser|
|000002f0| 76 65 72 2e 20 55 73 69 | 6e 67 20 61 6c 70 68 61 |ver. Usi|ng alpha|
|00000300| 2d 66 69 65 6c 64 73 20 | 79 6f 75 20 63 61 6e 20 |-fields |you can |
|00000310| 73 70 65 61 6b 20 74 68 | 65 20 74 65 78 74 20 73 |speak th|e text s|
|00000320| 6f 6d 65 6f 6e 65 20 65 | 6c 73 65 20 70 75 74 20 |omeone e|lse put |
|00000330| 69 6e 20 74 68 65 72 65 | 20 61 6e 64 20 74 68 65 |in there| and the|
|00000340| 20 6f 74 68 65 72 20 77 | 61 79 20 61 72 6f 75 6e | other w|ay aroun|
|00000350| 64 2e 0d 41 6e 64 20 6f | 66 63 6f 75 72 73 65 20 |d..And o|fcourse |
|00000360| 79 6f 75 20 63 61 6e 20 | 72 65 61 64 20 6f 75 74 |you can |read out|
|00000370| 20 61 20 63 6f 6d 70 6c | 65 74 65 20 74 65 78 74 | a compl|ete text|
|00000380| 20 66 69 6c 65 20 74 6f | 67 65 74 68 65 72 20 77 | file to|gether w|
|00000390| 69 74 68 20 74 68 65 20 | 73 74 61 6e 64 61 72 64 |ith the |standard|
|000003a0| 20 34 44 20 63 6f 6d 6d | 61 6e 64 20 52 45 41 44 | 4D comm|and READ|
|000003b0| 20 50 41 43 4b 45 54 2e | 20 54 6f 20 72 65 61 64 | PACKET.| To read|
|000003c0| 20 6f 75 74 20 6c 61 72 | 67 65 20 66 69 6c 65 73 | out lar|ge files|
|000003d0| 20 79 6f 75 20 63 61 6e | 20 6f 70 65 6e 20 74 77 | you can| open tw|
|000003e0| 6f 20 63 68 61 6e 6e 65 | 6c 73 20 77 69 74 68 20 |o channe|ls with |
|000003f0| 74 68 65 20 73 61 6d 65 | 20 76 6f 69 63 65 20 61 |the same| voice a|
|00000400| 6e 64 20 70 72 65 70 61 | 72 65 20 74 68 65 20 6e |nd prepa|re the n|
|00000410| 65 78 74 20 70 69 65 63 | 65 20 6f 66 20 74 65 78 |ext piec|e of tex|
|00000420| 74 20 66 6f 72 20 74 68 | 65 20 73 65 63 6f 6e 64 |t for th|e second|
|00000430| 20 76 6f 69 63 65 20 77 | 68 69 6c 65 20 74 68 65 | voice w|hile the|
|00000440| 20 66 69 72 73 74 20 76 | 6f 69 63 65 20 69 73 20 | first v|oice is |
|00000450| 73 74 69 6c 6c 20 73 70 | 65 61 6b 69 6e 67 2e 0d |still sp|eaking..|
|00000460| 4f 72 2c 20 69 66 20 79 | 6f 75 20 68 61 76 65 20 |Or, if y|ou have |
|00000470| 61 20 6d 6f 64 65 6d 20 | 77 69 74 68 20 61 75 64 |a modem |with aud|
|00000480| 69 6f 20 69 6e 70 75 74 | 2c 20 6d 61 6b 65 20 79 |io input|, make y|
|00000490| 6f 75 72 20 64 61 74 61 | 2d 62 61 73 65 20 69 6e |our data|-base in|
|000004a0| 74 6f 20 61 20 61 6e 73 | 77 65 72 69 6e 67 20 6d |to a ans|wering m|
|000004b0| 61 63 68 69 6e 65 2e 0d | 0d 49 66 20 79 6f 75 20 |achine..|.If you |
|000004c0| 69 6d 70 6c 65 6d 65 6e | 74 20 69 74 20 69 6e 20 |implemen|t it in |
|000004d0| 61 6e 79 20 6f 74 68 65 | 72 20 63 6f 6f 6c 20 77 |any othe|r cool w|
|000004e0| 61 79 20 49 27 64 20 6c | 69 6b 65 20 74 6f 20 68 |ay I'd l|ike to h|
|000004f0| 65 61 72 20 66 72 6f 6d | 20 79 6f 75 2e 20 45 73 |ear from| you. Es|
|00000500| 70 65 63 69 61 6c 6c 79 | 20 69 66 20 69 74 20 69 |pecially| if it i|
|00000510| 73 20 69 6d 70 6c 65 6d | 65 6e 74 65 64 20 66 6f |s implem|ented fo|
|00000520| 72 20 75 73 65 20 62 79 | 20 70 65 6f 70 6c 65 20 |r use by| people |
|00000530| 77 69 74 68 20 61 20 73 | 70 65 65 63 68 20 64 69 |with a s|peech di|
|00000540| 73 61 62 69 6c 69 74 79 | 2e 0d 0d 0d 00 00 00 2a |sability|.......*|
|00000550| 00 02 00 00 00 00 00 0c | 00 0a 00 03 01 00 00 09 |........|........|
|00000560| 00 00 00 00 00 00 00 00 | 00 11 00 0c 00 0a 00 03 |........|........|
|00000570| 00 00 00 09 00 00 00 00 | 00 00 00 00 06 ef 41 63 |........|......Ac|
|00000580| 6b 6e 6f 77 6c 65 64 67 | 65 6d 65 6e 74 73 0d 0d |knowledg|ements..|
|00000590| 4d 61 6e 79 20 74 68 61 | 6e 6b 73 20 74 6f 20 4c |Many tha|nks to L|
|000005a0| 61 77 72 65 6e 63 65 20 | 44 27 4f 6c 69 76 65 69 |awrence |D'Olivei|
|000005b0| 72 6f 20 61 6e 64 20 61 | 6c 6c 20 6f 74 68 65 72 |ro and a|ll other|
|000005c0| 73 20 77 68 6f 20 63 6f | 6e 74 72 69 62 75 74 65 |s who co|ntribute|
|000005d0| 64 20 74 6f 20 74 68 65 | 20 64 69 73 63 75 73 73 |d to the| discuss|
|000005e0| 69 6f 6e 73 20 72 65 67 | 61 72 64 69 6e 67 20 74 |ions reg|arding t|
|000005f0| 68 65 20 53 70 65 65 63 | 68 20 4d 61 6e 61 67 65 |he Speec|h Manage|
|00000600| 72 20 69 6e 20 74 68 65 | 20 63 6f 6d 70 2e 73 79 |r in the| comp.sy|
|00000610| 73 2e 6d 61 63 2e 70 72 | 6f 67 72 61 6d 6d 65 72 |s.mac.pr|ogrammer|
|00000620| 20 6e 65 77 73 67 72 6f | 75 70 20 6f 6e 20 55 73 | newsgro|up on Us|
|00000630| 65 6e 65 74 20 61 74 20 | 74 68 65 20 74 69 6d 65 |enet at |the time|
|00000640| 20 6f 66 20 69 74 73 20 | 66 69 72 73 74 20 72 65 | of its |first re|
|00000650| 6c 65 61 73 65 20 28 31 | 30 20 41 75 67 75 73 74 |lease (1|0 August|
|00000660| 20 31 39 39 33 29 2e 0d | 4c 61 77 72 65 6e 63 65 | 1993)..|Lawrence|
|00000670| 20 61 6c 73 6f 20 64 69 | 73 63 6f 76 65 72 65 64 | also di|scovered|
|00000680| 20 74 68 65 20 75 6e 64 | 6f 63 75 6d 65 6e 74 65 | the und|ocumente|
|00000690| 64 20 66 65 61 74 75 72 | 65 73 20 49 20 75 73 65 |d featur|es I use|
|000006a0| 20 77 69 74 68 20 74 68 | 65 20 53 50 20 56 6f 69 | with th|e SP Voi|
|000006b0| 63 65 20 73 6f 75 6e 64 | 20 66 75 6e 63 74 69 6f |ce sound| functio|
|000006c0| 6e 20 61 6e 64 20 68 65 | 20 68 65 6c 70 65 64 20 |n and he| helped |
|000006d0| 6d 65 20 74 6f 20 69 6d | 70 6c 65 6d 65 6e 74 20 |me to im|plement |
|000006e0| 69 74 2e 20 4d 61 6e 79 | 20 74 68 61 6e 6b 73 2c |it. Many| thanks,|
|000006f0| 20 4c 61 77 72 65 6e 63 | 65 21 20 54 68 65 73 65 | Lawrenc|e! These|
|00000700| 20 66 65 61 74 75 72 65 | 73 20 61 72 65 20 6e 6f | feature|s are no|
|00000710| 77 20 70 61 72 74 69 61 | 6c 6c 79 20 63 6f 6e 66 |w partia|lly conf|
|00000720| 69 72 6d 65 64 20 62 79 | 20 41 70 70 6c 65 20 61 |irmed by| Apple a|
|00000730| 6e 64 20 70 75 62 6c 69 | 73 68 65 64 20 66 6f 72 |nd publi|shed for|
|00000740| 20 65 78 70 65 72 69 6d | 65 6e 74 61 6c 20 75 73 | experim|ental us|
|00000750| 65 20 6f 6e 6c 79 2e 0d | 41 6c 73 6f 20 74 68 61 |e only..|Also tha|
|00000760| 6e 6b 73 20 74 6f 20 4d | 61 72 6b 20 48 61 72 6c |nks to M|ark Harl|
|00000770| 61 6e 20 28 53 70 65 65 | 63 68 20 54 65 63 68 6e |an (Spee|ch Techn|
|00000780| 6f 6c 6f 67 69 65 73 20 | 45 76 61 6e 67 65 6c 69 |ologies |Evangeli|
|00000790| 73 74 20 61 74 20 41 70 | 70 6c 65 20 43 6f 6d 70 |st at Ap|ple Comp|
|000007a0| 75 74 65 72 29 20 66 6f | 72 20 61 6e 73 77 65 72 |uter) fo|r answer|
|000007b0| 69 6e 67 20 6d 79 20 71 | 75 65 73 74 69 6f 6e 73 |ing my q|uestions|
|000007c0| 2e 0d 0d 41 6c 73 6f 20 | 6d 61 6e 79 20 74 68 61 |...Also |many tha|
|000007d0| 6e 6b 73 20 74 6f 20 74 | 68 65 20 62 65 74 61 2d |nks to t|he beta-|
|000007e0| 74 65 73 74 65 72 73 20 | 66 6f 72 20 74 68 65 69 |testers |for thei|
|000007f0| 72 20 74 69 6d 65 20 61 | 6e 64 20 65 66 66 6f 72 |r time a|nd effor|
|00000800| 74 3a 0d 0d 4d 69 63 68 | 61 65 6c 20 47 69 6e 73 |t:..Mich|ael Gins|
|00000810| 62 65 72 67 2c 20 4d 44 | 47 20 43 6f 6d 70 75 74 |berg, MD|G Comput|
|00000820| 65 72 20 53 65 72 76 69 | 63 65 73 20 28 37 32 31 |er Servi|ces (721|
|00000830| 36 30 2e 36 33 30 40 63 | 6f 6d 70 75 73 65 72 76 |60.630@c|ompuserv|
|00000840| 65 2e 63 6f 6d 29 0d d3 | c9 20 77 6f 72 6b 73 20 |e.com)..|. works |
|00000850| 67 72 65 61 74 2c 20 6d | 75 63 68 2c 20 6d 75 63 |great, m|uch, muc|
|00000860| 68 20 69 6d 70 72 6f 76 | 65 64 2e 20 20 49 74 20 |h improv|ed. It |
|00000870| 77 6f 72 6b 73 20 67 72 | 65 61 74 20 77 69 74 68 |works gr|eat with|
|00000880| 20 74 68 65 20 50 6c 61 | 69 6e 54 61 6c 6b 20 28 | the Pla|inTalk (|
|00000890| 68 69 67 68 20 71 75 61 | 6c 69 74 79 29 20 76 6f |high qua|lity) vo|
|000008a0| 69 63 65 73 2e 20 20 c9 | 20 54 68 65 20 73 70 65 |ices. .| The spe|
|000008b0| 65 63 68 20 77 6f 72 6b | 73 20 67 72 65 61 74 2c |ech work|s great,|
|000008c0| 20 77 68 69 6c 65 20 34 | 44 20 69 73 20 72 75 6e | while 4|D is run|
|000008d0| 6e 69 6e 67 20 79 6f 75 | 20 63 61 6e 20 65 76 65 |ning you| can eve|
|000008e0| 6e 20 73 77 69 74 63 68 | 20 74 6f 20 61 6e 6f 74 |n switch| to anot|
|000008f0| 68 65 72 20 61 70 70 6c | 69 63 61 74 69 6f 6e 20 |her appl|ication |
|00000900| 61 6e 64 20 74 68 65 20 | 73 70 65 65 63 68 20 63 |and the |speech c|
|00000910| 6f 6e 74 69 6e 75 65 73 | 20 28 49 20 67 75 65 73 |ontinues| (I gues|
|00000920| 73 20 61 20 66 65 61 74 | 75 72 65 20 6f 66 20 74 |s a feat|ure of t|
|00000930| 68 65 20 53 70 65 65 63 | 68 20 4d 61 6e 61 67 65 |he Speec|h Manage|
|00000940| 72 29 2e 20 20 c9 d2 0d | 0d 4b 79 6c 65 20 4a 2e |r). ...|.Kyle J.|
|00000950| 20 53 6d 69 74 68 2c 20 | 43 65 6e 74 72 61 6c 20 | Smith, |Central |
|00000960| 4d 6e 20 47 72 6f 75 70 | 20 48 65 61 6c 74 68 20 |Mn Group| Health |
|00000970| 50 6c 61 6e 20 28 6b 79 | 6c 65 73 6d 40 74 69 67 |Plan (ky|lesm@tig|
|00000980| 67 65 72 2e 73 74 63 6c | 6f 75 64 2e 6d 73 75 73 |ger.stcl|oud.msus|
|00000990| 2e 65 64 75 29 0d d3 49 | 20 68 61 76 65 20 6e 6f |.edu)..I| have no|
|000009a0| 77 20 75 73 65 64 20 53 | 70 65 65 63 68 20 50 61 |w used S|peech Pa|
|000009b0| 63 6b 20 69 6e 20 61 20 | 64 61 74 61 62 61 73 65 |ck in a |database|
|000009c0| 20 74 68 61 74 20 61 62 | 6f 75 74 20 36 20 70 65 | that ab|out 6 pe|
|000009d0| 6f 70 6c 65 20 75 73 65 | 2e 2e 2e 20 74 68 65 79 |ople use|... they|
|000009e0| 20 61 6c 6c 20 6c 6f 76 | 65 64 20 74 68 65 20 63 | all lov|ed the c|
|000009f0| 6f 6d 70 75 74 65 72 20 | 67 72 61 62 62 69 6e 67 |omputer |grabbing|
|00000a00| 20 74 68 65 69 72 20 61 | 74 74 65 6e 74 69 6f 6e | their a|ttention|
|00000a10| 20 62 79 20 73 61 79 69 | 6e 67 20 27 57 61 72 6e | by sayi|ng 'Warn|
|00000a20| 69 6e 67 27 20 72 61 74 | 68 65 72 20 74 68 61 6e |ing' rat|her than|
|00000a30| 20 62 65 65 70 69 6e 67 | 21 20 0d 4f 6e 63 65 20 | beeping|! .Once |
|00000a40| 61 67 61 69 6e 2c 20 49 | 20 66 69 6e 64 20 53 70 |again, I| find Sp|
|00000a50| 65 65 63 68 20 50 61 63 | 6b 20 74 6f 20 62 65 20 |eech Pac|k to be |
|00000a60| 76 65 72 79 20 73 6f 6c | 69 64 20 61 6e 64 20 77 |very sol|id and w|
|00000a70| 6f 72 6b 73 20 77 65 6c | 6c 20 6f 6e 20 61 20 76 |orks wel|l on a v|
|00000a80| 61 72 69 65 74 79 20 6f | 66 20 73 79 73 74 65 6d |ariety o|f system|
|00000a90| 73 2e d2 0d 0d 50 68 69 | 6c 69 70 70 65 20 47 69 |s....Phi|lippe Gi|
|00000aa0| 72 61 75 64 20 28 6c 72 | 69 63 69 6f 40 63 61 6c |raud (lr|icio@cal|
|00000ab0| 76 61 63 6f 6d 2e 66 72 | 29 0d d3 54 68 61 6e 6b |vacom.fr|)..Thank|
|00000ac0| 20 79 6f 75 20 66 6f 72 | 20 77 72 69 74 69 6e 67 | you for| writing|
|00000ad0| 20 74 68 69 73 20 65 78 | 74 65 72 6e 61 6c 20 70 | this ex|ternal p|
|00000ae0| 61 63 6b 61 67 65 2c 20 | 77 68 69 63 68 20 69 73 |ackage, |which is|
|00000af0| 20 76 65 72 79 2c 20 76 | 65 72 79 20 75 73 65 66 | very, v|ery usef|
|00000b00| 75 6c 2e 20 43 6f 6e 67 | 72 61 74 75 6c 61 74 69 |ul. Cong|ratulati|
|00000b10| 6f 6e 73 21 d2 0d 0d 4a | 6f 68 6e 20 4f 73 74 65 |ons!...J|ohn Oste|
|00000b20| 65 6e 2c 20 43 61 6e 74 | 65 72 62 75 72 79 20 53 |en, Cant|erbury S|
|00000b30| 63 68 6f 6f 6c 20 28 37 | 33 32 30 37 2e 33 33 32 |chool (7|3207.332|
|00000b40| 34 40 63 6f 6d 70 75 73 | 65 72 76 65 2e 63 6f 6d |4@compus|erve.com|
|00000b50| 29 0d d3 57 65 20 75 73 | 65 20 69 74 20 77 69 74 |)..We us|e it wit|
|00000b60| 68 20 6f 75 72 20 63 6f | 6d 70 75 74 65 72 20 73 |h our co|mputer s|
|00000b70| 70 65 6c 6c 69 6e 67 20 | 70 72 6f 67 72 61 6d 2e |pelling |program.|
|00000b80| 20 49 74 20 69 73 20 61 | 20 22 6d 75 73 74 20 68 | It is a| "must h|
|00000b90| 61 76 65 22 20 66 6f 72 | 20 74 68 69 73 20 70 75 |ave" for| this pu|
|00000ba0| 72 70 6f 73 65 d2 0d 0d | 4d 61 78 20 53 74 65 72 |rpose...|Max Ster|
|00000bb0| 6e 20 48 61 6e 66 20 28 | 53 54 45 52 4e 48 41 4e |n Hanf (|STERNHAN|
|00000bc0| 40 72 75 6c 63 72 69 2e | 4c 65 69 64 65 6e 55 6e |@rulcri.|LeidenUn|
|00000bd0| 69 76 2e 6e 6c 29 0d 0d | 41 20 66 65 77 20 6f 74 |iv.nl)..|A few ot|
|00000be0| 68 65 72 73 20 68 61 76 | 65 20 72 65 73 70 6f 6e |hers hav|e respon|
|00000bf0| 64 65 64 20 74 6f 20 6d | 65 20 77 69 74 68 20 71 |ded to m|e with q|
|00000c00| 75 65 73 74 69 6f 6e 73 | 20 61 6e 64 20 63 6f 6d |uestions| and com|
|00000c10| 70 6c 69 6d 65 6e 74 73 | 2e 20 54 68 61 6e 6b 73 |pliments|. Thanks|
|00000c20| 20 66 6f 72 20 74 68 65 | 20 73 75 70 70 6f 72 74 | for the| support|
|00000c30| 21 20 49 20 68 61 76 65 | 20 61 6c 72 65 61 64 79 |! I have| already|
|00000c40| 20 72 65 63 65 69 76 65 | 64 20 73 65 76 65 72 61 | receive|d severa|
|00000c50| 6c 20 70 6f 73 74 63 61 | 72 64 73 20 61 6e 64 20 |l postca|rds and |
|00000c60| 70 61 79 6d 65 6e 74 73 | 21 0d 0d 0d 0d 00 00 00 |payments|!.......|
|00000c70| 01 20 00 00 00 16 00 01 | 00 00 00 00 00 0c 00 0a |. ......|........|
|00000c80| 00 03 00 00 00 09 00 00 | 00 00 00 00 00 00 03 d0 |........|........|
|00000c90| 50 68 6f 6e 65 6d 65 20 | 43 6f 64 65 0d 0d 57 68 |Phoneme |Code..Wh|
|00000ca0| 65 6e 20 79 6f 75 20 70 | 61 73 73 20 61 20 73 74 |en you p|ass a st|
|00000cb0| 72 69 6e 67 20 6f 66 20 | 63 68 61 72 61 63 74 65 |ring of |characte|
|00000cc0| 72 73 20 74 6f 20 74 68 | 65 20 53 70 65 65 63 68 |rs to th|e Speech|
|00000cd0| 20 4d 61 6e 61 67 65 72 | 20 76 69 61 20 53 70 65 | Manager| via Spe|
|00000ce0| 65 63 68 20 50 61 63 6b | 20 74 68 65 20 73 74 72 |ech Pack| the str|
|00000cf0| 69 6e 67 20 69 73 20 63 | 6f 6e 76 65 72 74 65 64 |ing is c|onverted|
|00000d00| 20 69 6e 74 6f 20 70 68 | 6f 6e 65 6d 65 20 63 6f | into ph|oneme co|
|00000d10| 64 65 2e 20 54 68 69 73 | 20 63 6f 64 65 20 63 6f |de. This| code co|
|00000d20| 6e 74 61 69 6e 73 20 73 | 70 65 63 69 61 6c 20 63 |ntains s|pecial c|
|00000d30| 68 61 72 61 63 74 65 72 | 73 20 74 6f 20 69 6e 64 |haracter|s to ind|
|00000d40| 69 63 61 74 65 20 68 6f | 77 20 61 20 77 6f 72 64 |icate ho|w a word|
|00000d50| 20 6d 75 73 74 20 62 65 | 20 70 72 6f 6e 6f 75 6e | must be| pronoun|
|00000d60| 63 65 64 2e 20 54 68 65 | 20 73 65 63 6f 6e 64 20 |ced. The| second |
|00000d70| 73 74 65 70 20 69 73 20 | 74 6f 20 63 6f 6e 76 65 |step is |to conve|
|00000d80| 72 74 20 74 68 69 73 20 | 70 68 6f 6e 65 6d 65 20 |rt this |phoneme |
|00000d90| 63 6f 64 65 20 69 6e 74 | 6f 20 61 6c 6c 6f 70 68 |code int|o alloph|
|00000da0| 6f 6e 65 20 63 6f 64 65 | 20 61 6e 64 20 74 68 65 |one code| and the|
|00000db0| 6e 20 69 6e 74 6f 20 61 | 63 74 75 61 6c 20 73 6f |n into a|ctual so|
|00000dc0| 75 6e 64 2d 64 61 74 61 | 20 61 6e 64 20 63 72 65 |und-data| and cre|
|00000dd0| 61 74 65 20 74 68 65 20 | 61 75 64 69 6f 20 6f 75 |ate the |audio ou|
|00000de0| 74 70 75 74 2e 0d 0d 54 | 68 65 20 66 69 72 73 74 |tput...T|he first|
|00000df0| 20 73 74 65 70 20 6f 66 | 20 63 6f 6e 76 65 72 74 | step of| convert|
|00000e00| 69 6e 67 20 61 20 73 74 | 72 69 6e 67 20 69 6e 74 |ing a st|ring int|
|00000e10| 6f 20 70 68 6f 6e 65 6d | 65 20 63 6f 6e 74 72 6f |o phonem|e contro|
|00000e20| 6c 20 63 6f 64 65 20 74 | 61 6b 65 73 20 61 20 6c |l code t|akes a l|
|00000e30| 6f 74 20 6f 66 20 6d 65 | 6d 6f 72 79 20 61 6e 64 |ot of me|mory and|
|00000e40| 20 74 69 6d 65 20 61 6e | 64 20 69 73 20 61 6c 73 | time an|d is als|
|00000e50| 6f 20 74 68 65 20 6d 6f | 73 74 20 69 6d 70 6f 72 |o the mo|st impor|
|00000e60| 74 61 6e 74 20 73 74 65 | 70 20 73 69 6e 63 65 20 |tant ste|p since |
|00000e70| 74 68 65 20 71 75 61 6c | 69 74 79 20 6f 66 20 74 |the qual|ity of t|
|00000e80| 68 65 20 76 6f 69 63 65 | 20 64 65 70 65 6e 64 73 |he voice| depends|
|00000e90| 20 6c 61 72 67 65 6c 79 | 20 6f 6e 20 74 68 65 20 | largely| on the |
|00000ea0| 70 72 6f 6e 6f 75 6e 63 | 69 61 74 69 6f 6e 2e 20 |pronounc|iation. |
|00000eb0| 49 66 20 79 6f 75 20 70 | 72 6f 76 69 64 65 20 70 |If you p|rovide p|
|00000ec0| 68 6f 6e 65 6d 65 20 63 | 6f 64 65 20 64 69 72 65 |honeme c|ode dire|
|00000ed0| 63 74 6c 79 20 74 68 69 | 73 20 70 72 6f 6e 6f 75 |ctly thi|s pronou|
|00000ee0| 6e 63 69 61 74 69 6f 6e | 20 69 73 20 75 73 65 64 |nciation| is used|
|00000ef0| 20 61 6e 64 20 79 6f 75 | 20 63 61 6e 20 61 63 74 | and you| can act|
|00000f00| 75 61 6c 6c 79 20 75 73 | 65 20 70 68 6f 6e 65 6d |ually us|e phonem|
|00000f10| 65 20 63 6f 64 65 20 63 | 72 65 61 74 65 64 20 62 |e code c|reated b|
|00000f20| 79 20 61 20 62 65 74 74 | 65 72 20 73 70 65 65 63 |y a bett|er speec|
|00000f30| 68 20 73 79 6e 74 68 65 | 73 69 7a 65 72 20 77 69 |h synthe|sizer wi|
|00000f40| 74 68 20 70 6f 73 73 69 | 62 6c 79 20 61 20 6c 61 |th possi|bly a la|
|00000f50| 72 67 65 72 20 64 69 63 | 74 69 6f 6e 61 72 79 2e |rger dic|tionary.|
|00000f60| 0d 59 6f 75 20 63 61 6e | 20 75 73 65 20 74 68 65 |.You can| use the|
|00000f70| 20 53 50 20 56 6f 69 63 | 65 20 63 6f 64 65 20 66 | SP Voic|e code f|
|00000f80| 75 6e 63 74 69 6f 6e 20 | 74 6f 20 63 6f 6e 76 65 |unction |to conve|
|00000f90| 72 74 20 61 20 73 74 72 | 69 6e 67 20 6f 66 20 63 |rt a str|ing of c|
|00000fa0| 68 61 72 61 63 74 65 72 | 73 20 69 6e 74 6f 20 70 |haracter|s into p|
|00000fb0| 68 6f 6e 65 6d 65 20 63 | 6f 64 65 20 61 6e 64 20 |honeme c|ode and |
|00000fc0| 73 74 6f 72 65 20 74 68 | 69 73 20 65 69 74 68 65 |store th|is eithe|
|00000fd0| 72 20 69 6e 20 74 68 65 | 20 73 74 72 75 63 74 75 |r in the| structu|
|00000fe0| 72 65 20 66 69 6c 65 20 | 28 61 73 20 61 20 d3 53 |re file |(as a .S|
|00000ff0| 54 52 23 d2 20 72 65 73 | 6f 75 72 63 65 20 66 6f |TR#. res|ource fo|
|00001000| 72 20 75 73 65 20 77 69 | 74 68 20 74 68 65 20 53 |r use wi|th the S|
|00001010| 50 20 56 6f 69 63 65 20 | 53 74 72 69 6e 67 20 66 |P Voice |String f|
|00001020| 75 6e 63 74 69 6f 6e 29 | 2c 20 61 20 66 69 65 6c |unction)|, a fiel|
|00001030| 64 20 69 6e 73 69 64 65 | 20 74 68 65 20 64 61 74 |d inside| the dat|
|00001040| 61 2d 66 69 6c 65 20 6f | 72 20 79 6f 75 72 20 6f |a-file o|r your o|
|00001050| 77 6e 20 64 6f 63 75 6d | 65 6e 74 73 2e 0d 0d 0d |wn docum|ents....|
|00001060| 00 00 04 0a 44 69 63 74 | 69 6f 6e 61 72 79 0d 0d |....Dict|ionary..|
|00001070| 41 20 64 69 63 74 69 6f | 6e 61 72 79 20 69 73 20 |A dictio|nary is |
|00001080| 61 20 6c 69 73 74 20 6f | 66 20 77 6f 72 64 73 20 |a list o|f words |
|00001090| 61 6e 64 20 74 68 65 69 | 72 20 70 68 6f 6e 65 6d |and thei|r phonem|
|000010a0| 65 20 63 6f 64 65 20 65 | 71 75 69 76 61 6c 65 6e |e code e|quivalen|
|000010b0| 74 2e 20 54 68 65 20 53 | 70 65 65 63 68 20 4d 61 |t. The S|peech Ma|
|000010c0| 6e 61 67 65 72 20 75 73 | 65 73 20 73 75 63 68 20 |nager us|es such |
|000010d0| 61 20 6c 69 73 74 20 74 | 6f 20 6c 6f 6f 6b 20 66 |a list t|o look f|
|000010e0| 6f 72 20 61 20 77 6f 72 | 64 20 69 74 20 6e 65 65 |or a wor|d it nee|
|000010f0| 64 73 20 74 6f 20 63 6f | 6e 76 65 72 74 20 69 6e |ds to co|nvert in|
|00001100| 74 6f 20 70 68 6f 6e 65 | 6d 65 20 63 6f 64 65 2e |to phone|me code.|
|00001110| 20 49 66 20 69 74 20 63 | 61 6e 20 6e 6f 74 20 62 | If it c|an not b|
|00001120| 65 20 66 6f 75 6e 64 20 | 69 6e 20 74 68 65 20 64 |e found |in the d|
|00001130| 69 63 74 69 6f 6e 61 72 | 79 20 74 68 65 20 63 6f |ictionar|y the co|
|00001140| 6e 76 65 72 73 69 6f 6e | 20 69 73 20 62 61 73 65 |nversion| is base|
|00001150| 64 20 6f 6e 20 74 68 65 | 20 63 68 61 72 61 63 74 |d on the| charact|
|00001160| 65 72 73 20 69 6e 20 74 | 68 65 20 77 6f 72 64 2e |ers in t|he word.|
|00001170| 20 41 20 64 69 63 74 69 | 6f 6e 61 72 79 20 69 73 | A dicti|onary is|
|00001180| 20 76 65 72 79 20 75 73 | 65 66 75 6c 20 66 6f 72 | very us|eful for|
|00001190| 20 77 6f 72 64 73 20 77 | 68 69 63 68 20 61 72 65 | words w|hich are|
|000011a0| 20 6f 74 68 65 72 77 69 | 73 65 20 70 72 6f 6e 6f | otherwi|se prono|
|000011b0| 75 6e 63 65 64 20 69 6e | 63 6f 72 72 65 63 74 2c |unced in|correct,|
|000011c0| 20 6c 69 6b 65 20 6e 61 | 6d 65 73 20 6f 66 20 70 | like na|mes of p|
|000011d0| 6c 61 63 65 73 20 61 6e | 64 20 70 65 6f 70 6c 65 |laces an|d people|
|000011e0| 2e 0d 53 70 65 65 63 68 | 20 50 61 63 6b 20 69 6e |..Speech| Pack in|
|000011f0| 63 6c 75 64 65 73 20 6f | 6e 65 20 64 69 63 74 69 |cludes o|ne dicti|
|00001200| 6f 6e 61 72 79 20 61 73 | 20 61 20 d3 64 69 63 74 |onary as| a .dict|
|00001210| d2 20 72 65 73 6f 75 72 | 63 65 2c 20 77 68 69 63 |. resour|ce, whic|
|00001220| 68 20 69 73 20 69 6e 73 | 74 61 6c 6c 65 64 20 77 |h is ins|talled w|
|00001230| 69 74 68 20 65 76 65 72 | 79 20 73 70 65 65 63 68 |ith ever|y speech|
|00001240| 20 63 68 61 6e 6e 65 6c | 20 79 6f 75 20 6f 70 65 | channel| you ope|
|00001250| 6e 20 75 73 69 6e 67 20 | 74 68 65 20 53 50 20 4f |n using |the SP O|
|00001260| 70 65 6e 20 56 6f 69 63 | 65 20 66 75 6e 63 74 69 |pen Voic|e functi|
|00001270| 6f 6e 2e 0d 54 68 65 72 | 65 20 61 72 65 20 61 20 |on..Ther|e are a |
|00001280| 66 65 77 20 77 6f 72 64 | 73 20 69 6e 63 6c 75 64 |few word|s includ|
|00001290| 65 64 2c 20 72 65 6c 61 | 74 65 64 20 74 6f 20 74 |ed, rela|ted to t|
|000012a0| 68 65 20 4d 61 63 69 6e | 74 6f 73 68 2c 20 34 74 |he Macin|tosh, 4t|
|000012b0| 68 20 44 69 6d 65 6e 73 | 69 6f 6e 20 61 6e 64 20 |h Dimens|ion and |
|000012c0| 73 6f 6d 65 20 67 65 6f | 67 72 61 70 68 69 63 20 |some geo|graphic |
|000012d0| 6e 61 6d 65 73 2c 20 62 | 75 74 20 69 66 20 79 6f |names, b|ut if yo|
|000012e0| 75 20 68 61 76 65 20 61 | 6e 79 20 73 75 67 67 65 |u have a|ny sugge|
|000012f0| 73 74 69 6f 6e 73 20 66 | 6f 72 20 77 6f 72 64 73 |stions f|or words|
|00001300| 20 79 6f 75 20 77 61 6e | 74 20 69 6e 63 6c 75 64 | you wan|t includ|
|00001310| 65 64 2c 20 6c 65 74 20 | 6d 65 20 6b 6e 6f 77 2e |ed, let |me know.|
|00001320| 20 54 68 65 20 70 68 6f | 6e 65 6d 65 20 63 6f 64 | The pho|neme cod|
|00001330| 65 20 77 61 73 20 28 62 | 61 73 65 64 20 6f 6e 20 |e was (b|ased on |
|00001340| 63 6f 64 65 29 20 67 65 | 6e 65 72 61 74 65 64 20 |code) ge|nerated |
|00001350| 62 79 20 74 68 65 20 4d | 61 63 69 6e 54 61 6c 6b |by the M|acinTalk|
|00001360| 20 50 72 6f 20 73 70 65 | 65 63 68 20 73 79 6e 74 | Pro spe|ech synt|
|00001370| 68 65 73 69 7a 65 72 20 | 75 73 69 6e 67 20 74 68 |hesizer |using th|
|00001380| 65 20 d3 4d 61 6c 65 20 | 56 6f 69 63 65 d2 20 76 |e .Male |Voice. v|
|00001390| 6f 69 63 65 2e 0d 0d 49 | 66 20 79 6f 75 20 68 61 |oice...I|f you ha|
|000013a0| 76 65 20 73 75 67 67 65 | 73 74 69 6f 6e 73 20 61 |ve sugge|stions a|
|000013b0| 62 6f 75 74 20 77 6f 72 | 64 73 20 74 6f 20 61 64 |bout wor|ds to ad|
|000013c0| 64 20 74 6f 20 74 68 65 | 20 64 69 63 74 69 6f 6e |d to the| diction|
|000013d0| 61 72 79 2c 20 63 6f 6e | 74 61 63 74 20 6d 65 2e |ary, con|tact me.|
|000013e0| 20 49 66 20 70 6f 73 73 | 69 62 6c 65 20 67 69 76 | If poss|ible giv|
|000013f0| 65 20 6d 65 20 74 68 65 | 20 63 6f 72 72 65 63 74 |e me the| correct|
|00001400| 20 70 68 6f 6e 65 6d 65 | 20 63 6f 64 65 20 61 6c | phoneme| code al|
|00001410| 73 6f 20 28 77 68 65 6e | 20 45 6e 67 6c 69 73 68 |so (when| English|
|00001420| 20 69 73 20 79 6f 75 72 | 20 6e 61 74 69 76 65 20 | is your| native |
|00001430| 74 6f 6e 67 75 65 20 79 | 6f 75 72 20 70 72 6f 6e |tongue y|our pron|
|00001440| 6f 75 6e 63 69 61 74 69 | 6f 6e 20 69 73 20 70 72 |ounciati|on is pr|
|00001450| 6f 62 61 62 6c 79 20 62 | 65 74 74 65 72 20 74 68 |obably b|etter th|
|00001460| 61 6e 20 6d 69 6e 65 21 | 29 2e 0d 0d 0d 0d 00 00 |an mine!|).......|
|00001470| 00 01 20 00 00 00 16 00 | 01 00 00 00 00 00 0c 00 |.. .....|........|
|00001480| 0a 00 03 00 00 00 09 00 | 00 00 00 00 00 00 00 03 |........|........|
|00001490| b7 50 61 72 61 6d 65 74 | 65 72 73 0d 0d 54 68 65 |.Paramet|ers..The|
|000014a0| 20 6c 65 6e 67 74 68 20 | 73 70 65 63 69 66 69 65 | length |specifie|
|000014b0| 64 20 77 69 74 68 20 61 | 20 73 74 72 69 6e 67 20 |d with a| string |
|000014c0| 6f 72 20 74 65 78 74 20 | 70 61 72 61 6d 65 74 65 |or text |paramete|
|000014d0| 72 20 69 73 20 74 68 65 | 20 6c 65 6e 67 74 68 20 |r is the| length |
|000014e0| 72 65 71 75 69 72 65 64 | 2e 20 54 68 65 20 65 78 |required|. The ex|
|000014f0| 74 65 72 6e 61 6c 20 64 | 6f 65 73 20 6e 6f 74 20 |ternal d|oes not |
|00001500| 74 65 73 74 20 66 6f 72 | 20 74 68 65 20 63 6f 72 |test for| the cor|
|00001510| 72 65 63 74 20 73 69 7a | 65 20 6f 66 20 74 68 65 |rect siz|e of the|
|00001520| 20 70 61 72 61 6d 65 74 | 65 72 73 2e 20 50 6c 65 | paramet|ers. Ple|
|00001530| 61 73 65 2c 20 64 65 63 | 6c 61 72 65 20 74 68 65 |ase, dec|lare the|
|00001540| 20 73 74 72 69 6e 67 73 | 20 79 6f 75 20 75 73 65 | strings| you use|
|00001550| 20 74 6f 20 74 68 65 20 | 72 65 71 75 65 73 74 65 | to the |requeste|
|00001560| 64 20 6c 65 6e 67 74 68 | 2e 0d 55 73 65 20 6f 66 |d length|..Use of|
|00001570| 20 61 6e 79 20 6f 66 20 | 74 68 65 20 53 70 65 65 | any of |the Spee|
|00001580| 63 68 20 50 61 63 6b 20 | 63 6f 6d 6d 61 6e 64 73 |ch Pack |commands|
|00001590| 20 69 6e 73 69 64 65 20 | 74 68 65 20 44 65 62 75 | inside |the Debu|
|000015a0| 67 67 65 72 20 77 69 6e | 64 6f 77 20 69 73 20 6e |gger win|dow is n|
|000015b0| 6f 74 20 72 65 63 6f 6d | 6d 65 6e 64 65 64 2e 20 |ot recom|mended. |
|000015c0| 4e 6f 74 20 70 61 73 73 | 69 6e 67 20 70 61 72 61 |Not pass|ing para|
|000015d0| 6d 65 74 65 72 73 20 69 | 73 20 61 6c 73 6f 20 6e |meters i|s also n|
|000015e0| 6f 74 20 72 65 63 6f 6d | 6d 65 6e 64 65 64 2e 0d |ot recom|mended..|
|000015f0| 59 6f 75 20 73 68 6f 75 | 6c 64 20 61 76 6f 69 64 |You shou|ld avoid|
|00001600| 20 72 65 74 75 72 6e 69 | 6e 67 20 74 6f 20 74 68 | returni|ng to th|
|00001610| 65 20 44 65 73 69 67 6e | 20 45 6e 76 69 72 6f 6e |e Design| Environ|
|00001620| 6d 65 6e 74 20 77 68 65 | 6e 20 73 70 65 65 63 68 |ment whe|n speech|
|00001630| 20 69 73 20 62 65 69 6e | 67 20 70 72 6f 64 75 63 | is bein|g produc|
|00001640| 65 64 2e 0d 0d 43 6f 6d | 70 69 6c 65 72 20 64 65 |ed...Com|piler de|
|00001650| 63 6c 61 72 61 74 69 6f | 6e 73 20 66 6f 72 20 76 |claratio|ns for v|
|00001660| 61 72 69 61 62 6c 65 73 | 20 75 73 65 64 20 69 6e |ariables| used in|
|00001670| 20 74 68 65 20 65 78 61 | 6d 70 6c 65 73 3a 0d 20 | the exa|mples:. |
|00001680| 20 43 5f 49 4e 54 45 47 | 45 52 20 28 24 65 72 72 | C_INTEG|ER ($err|
|00001690| 3b 24 73 70 65 65 63 68 | 72 65 66 3b 24 70 72 65 |;$speech|ref;$pre|
|000016a0| 73 65 6e 74 3b 24 63 6f | 75 6e 74 3b 24 72 61 74 |sent;$co|unt;$rat|
|000016b0| 65 3b 24 70 69 74 63 68 | 3b 24 69 29 0d 20 20 43 |e;$pitch|;$i). C|
|000016c0| 5f 49 4e 54 45 47 45 52 | 20 28 24 67 65 6e 64 65 |_INTEGER| ($gende|
|000016d0| 72 3b 24 61 67 65 3b 24 | 6c 61 6e 67 75 61 67 65 |r;$age;$|language|
|000016e0| 3b 24 72 65 67 69 6f 6e | 3b 24 73 63 72 69 70 74 |;$region|;$script|
|000016f0| 29 0d 20 20 43 5f 4c 4f | 4e 47 49 4e 54 20 28 24 |). C_LO|NGINT ($|
|00001700| 6d 6f 64 75 6c 29 0d 20 | 20 43 5f 53 54 52 49 4e |modul). | C_STRIN|
|00001710| 47 20 28 34 3b 24 63 72 | 65 61 74 6f 72 3b 24 69 |G (4;$cr|eator;$i|
|00001720| 64 29 0d 20 20 43 5f 53 | 54 52 49 4e 47 20 28 31 |d). C_S|TRING (1|
|00001730| 35 3b 24 6d 67 72 76 65 | 72 73 3b 24 70 61 63 6b |5;$mgrve|rs;$pack|
|00001740| 76 65 72 73 29 0d 20 20 | 43 5f 53 54 52 49 4e 47 |vers). |C_STRING|
|00001750| 20 28 36 33 3b 24 76 6f | 69 63 65 6e 61 6d 65 29 | (63;$vo|icename)|
|00001760| 0d 20 20 43 5f 53 54 52 | 49 4e 47 20 28 32 35 35 |. C_STR|ING (255|
|00001770| 3b 24 6c 69 6e 65 3b 24 | 63 6f 6d 6d 65 6e 74 3b |;$line;$|comment;|
|00001780| 24 6d 65 73 73 61 67 65 | 3b 24 70 68 6f 6e 65 6d |$message|;$phonem|
|00001790| 65 3b 24 70 61 74 68 29 | 0d 20 20 43 5f 54 45 58 |e;$path)|. C_TEX|
|000017a0| 54 20 28 24 6c 69 6e 65 | 73 29 0d 0d 49 20 75 73 |T ($line|s)..I us|
|000017b0| 65 64 20 6c 6f 63 61 6c | 20 76 61 72 69 61 62 6c |ed local| variabl|
|000017c0| 65 73 20 69 6e 20 74 68 | 65 20 65 78 61 6d 70 6c |es in th|e exampl|
|000017d0| 65 73 20 62 75 74 20 61 | 6e 79 20 6f 74 68 65 72 |es but a|ny other|
|000017e0| 20 74 79 70 65 20 69 73 | 20 66 69 6e 65 2e 20 49 | type is| fine. I|
|000017f0| 6e 20 73 6f 6d 65 20 63 | 61 73 65 73 20 6c 69 6b |n some c|ases lik|
|00001800| 65 20 74 68 65 20 24 73 | 70 65 65 63 68 72 65 66 |e the $s|peechref|
|00001810| 20 79 6f 75 20 6d 61 79 | 20 77 61 6e 74 20 74 6f | you may| want to|
|00001820| 20 75 73 65 20 61 20 69 | 6e 74 65 72 70 72 6f 63 | use a i|nterproc|
|00001830| 65 73 73 20 76 61 72 69 | 61 62 6c 65 20 69 6e 73 |ess vari|able ins|
|00001840| 74 65 61 64 2e 0d 0d 0d | 00 00 0a d9 46 69 6c 65 |tead....|....File|
|00001850| 70 61 74 68 0d 0d 57 68 | 65 6e 20 61 20 70 61 72 |path..Wh|en a par|
|00001860| 61 6d 65 74 65 72 20 61 | 63 63 65 70 74 73 20 61 |ameter a|ccepts a|
|00001870| 20 66 69 6c 65 70 61 74 | 68 20 61 73 20 69 6e 70 | filepat|h as inp|
|00001880| 75 74 2c 20 74 68 69 73 | 20 6d 65 61 6e 73 20 65 |ut, this| means e|
|00001890| 69 74 68 65 72 20 74 68 | 65 20 64 6f 63 75 6d 65 |ither th|e docume|
|000018a0| 6e 74 20 6e 61 6d 65 20 | 6f 72 20 74 68 65 20 66 |nt name |or the f|
|000018b0| 75 6c 6c 20 66 69 6c 65 | 2d 70 61 74 68 2e 20 57 |ull file|-path. W|
|000018c0| 68 65 6e 20 79 6f 75 20 | 73 70 65 63 69 66 79 20 |hen you |specify |
|000018d0| 6f 6e 6c 79 20 61 20 64 | 6f 63 75 6d 65 6e 74 20 |only a d|ocument |
|000018e0| 6e 61 6d 65 20 69 74 20 | 77 69 6c 6c 20 62 65 20 |name it |will be |
|000018f0| 73 61 76 65 64 20 69 6e | 20 74 68 65 20 64 65 66 |saved in| the def|
|00001900| 61 75 6c 74 20 66 6f 6c | 64 65 72 2c 20 75 73 75 |ault fol|der, usu|
|00001910| 61 6c 6c 79 20 74 68 65 | 20 6f 6e 65 20 77 69 74 |ally the| one wit|
|00001920| 68 20 74 68 65 20 64 61 | 74 61 2d 66 69 6c 65 2e |h the da|ta-file.|
|00001930| 0d 45 61 63 68 20 65 6c | 65 6d 65 6e 74 20 6e 61 |.Each el|ement na|
|00001940| 6d 65 20 28 66 6f 6c 64 | 65 72 20 6f 72 20 66 69 |me (fold|er or fi|
|00001950| 6c 65 20 6e 61 6d 65 29 | 20 63 61 6e 27 74 20 62 |le name)| can't b|
|00001960| 65 20 6c 6f 6e 67 65 72 | 20 74 68 61 6e 20 33 31 |e longer| than 31|
|00001970| 20 63 68 61 72 61 63 74 | 65 72 73 2e 20 49 66 20 | charact|ers. If |
|00001980| 74 68 65 20 66 69 6c 65 | 70 61 74 68 20 63 6f 6e |the file|path con|
|00001990| 74 61 69 6e 73 20 6c 6f | 6e 67 65 72 20 6e 61 6d |tains lo|nger nam|
|000019a0| 65 73 20 74 68 65 20 6e | 61 6d 65 20 69 73 20 63 |es the n|ame is c|
|000019b0| 6c 69 70 70 65 64 20 74 | 6f 20 33 31 20 63 68 61 |lipped t|o 31 cha|
|000019c0| 72 61 63 74 65 72 73 20 | 61 6e 64 20 74 68 75 73 |racters |and thus|
|000019d0| 20 74 68 65 20 66 6f 6c | 64 65 72 20 6f 72 20 66 | the fol|der or f|
|000019e0| 69 6c 65 20 77 69 6c 6c | 20 6e 6f 74 20 62 65 20 |ile will| not be |
|000019f0| 66 6f 75 6e 64 2e 0d 49 | 66 20 79 6f 75 20 73 70 |found..I|f you sp|
|00001a00| 65 63 69 66 79 20 74 68 | 65 20 66 75 6c 6c 20 70 |ecify th|e full p|
|00001a10| 61 74 68 6e 61 6d 65 20 | 69 74 20 6d 61 79 20 63 |athname |it may c|
|00001a20| 6f 6e 74 61 69 6e 20 6e | 61 6d 65 73 20 6f 66 20 |ontain n|ames of |
|00001a30| 61 6c 69 61 73 65 73 2e | 20 54 68 65 73 65 20 61 |aliases.| These a|
|00001a40| 6c 69 61 73 65 73 20 61 | 72 65 20 72 65 73 6f 6c |liases a|re resol|
|00001a50| 76 65 64 20 66 6f 72 20 | 79 6f 75 2c 20 65 76 65 |ved for |you, eve|
|00001a60| 6e 20 69 66 20 74 68 65 | 79 20 6c 65 61 64 20 74 |n if the|y lead t|
|00001a70| 6f 20 61 6e 20 75 6e 6d | 6f 75 6e 74 65 64 20 66 |o an unm|ounted f|
|00001a80| 69 6c 65 2d 73 65 72 76 | 65 72 20 76 6f 6c 75 6d |ile-serv|er volum|
|00001a90| 65 20 77 68 69 63 68 20 | 69 73 20 74 68 65 6e 20 |e which |is then |
|00001aa0| 6d 6f 75 6e 74 65 64 2e | 20 59 6f 75 20 63 61 6e |mounted.| You can|
|00001ab0| 20 61 6c 73 6f 20 75 73 | 65 20 61 6e 20 65 6d 70 | also us|e an emp|
|00001ac0| 74 79 20 73 74 72 69 6e | 67 20 61 73 20 74 68 65 |ty strin|g as the|
|00001ad0| 20 70 61 74 68 20 74 6f | 20 6c 65 74 20 74 68 65 | path to| let the|
|00001ae0| 20 75 73 65 72 20 73 65 | 6c 65 63 74 20 74 68 65 | user se|lect the|
|00001af0| 20 6c 6f 63 61 74 69 6f | 6e 20 6f 66 20 74 68 65 | locatio|n of the|
|00001b00| 20 66 69 6c 65 20 74 6f | 20 63 72 65 61 74 65 2e | file to| create.|
|00001b10| 0d 57 68 65 6e 20 75 73 | 69 6e 67 20 53 79 73 74 |.When us|ing Syst|
|00001b20| 65 6d 20 37 2e 30 20 6f | 72 20 6c 61 74 65 72 20 |em 7.0 o|r later |
|00001b30| 61 6e 64 20 61 20 66 6f | 6c 64 65 72 20 63 61 6e |and a fo|lder can|
|00001b40| 20 6e 6f 74 20 62 65 20 | 66 6f 75 6e 64 20 61 6e | not be |found an|
|00001b50| 64 20 69 74 73 20 6c 65 | 6e 67 74 68 20 69 73 20 |d its le|ngth is |
|00001b60| 66 6f 75 72 20 63 68 61 | 72 61 63 74 65 72 73 20 |four cha|racters |
|00001b70| 74 68 65 20 63 6f 64 65 | 20 74 72 69 65 73 20 74 |the code| tries t|
|00001b80| 6f 20 73 65 65 20 69 66 | 20 69 74 20 69 73 20 61 |o see if| it is a|
|00001b90| 20 73 70 65 63 69 61 6c | 20 73 79 73 74 65 6d 20 | special| system |
|00001ba0| 72 65 6c 61 74 65 64 20 | 66 6f 6c 64 65 72 20 61 |related |folder a|
|00001bb0| 62 62 72 65 76 69 61 74 | 69 6f 6e 3a 0d 0d 54 68 |bbreviat|ion:..Th|
|00001bc0| 65 73 65 20 66 6f 6c 64 | 65 72 20 74 79 70 65 73 |ese fold|er types|
|00001bd0| 20 61 72 65 20 76 61 6c | 69 64 20 73 69 6e 63 65 | are val|id since|
|00001be0| 20 53 79 73 74 65 6d 20 | 37 2e 30 3a 0d 0d 46 6f | System |7.0:..Fo|
|00001bf0| 6c 64 65 72 20 74 79 70 | 65 3a 20 20 20 20 20 20 |lder typ|e: |
|00001c00| 46 6f 6c 64 65 72 20 4e | 61 6d 65 3a 20 20 20 20 |Folder N|ame: |
|00001c10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001c20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001c30| 20 20 20 20 20 20 20 20 | 20 0d 61 6d 6e 75 20 20 | | .amnu |
|00001c40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 41 70 | | Ap|
|00001c50| 70 6c 65 20 4d 65 6e 75 | 20 49 74 65 6d 73 0d 63 |ple Menu| Items.c|
|00001c60| 74 72 6c 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |trl | |
|00001c70| 20 20 20 20 20 43 6f 6e | 74 72 6f 6c 20 50 61 6e | Con|trol Pan|
|00001c80| 65 6c 73 0d 64 65 73 6b | 20 20 20 20 20 20 20 20 |els.desk| |
|00001c90| 20 20 20 20 20 20 20 20 | 20 44 65 73 6b 74 6f 70 | | Desktop|
|00001ca0| 20 46 6f 6c 64 65 72 0d | 65 6d 70 74 20 20 20 20 | Folder.|empt |
|00001cb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 57 68 65 72 | | Wher|
|00001cc0| 65 54 6f 45 6d 70 74 79 | 54 72 61 73 68 20 28 66 |eToEmpty|Trash (f|
|00001cd0| 6f 72 20 6e 65 74 77 6f | 72 6b 20 74 72 61 73 68 |or netwo|rk trash|
|00001ce0| 29 0d 65 78 74 6e 20 20 | 20 20 20 20 20 20 20 20 |).extn | |
|00001cf0| 20 20 20 20 20 20 20 45 | 78 74 65 6e 73 69 6f 6e | E|xtension|
|00001d00| 73 0d 6d 61 63 73 20 20 | 20 20 20 20 20 20 20 20 |s.macs | |
|00001d10| 20 20 20 20 20 20 53 79 | 73 74 65 6d 20 46 6f 6c | Sy|stem Fol|
|00001d20| 64 65 72 0d 70 72 65 66 | 20 20 20 20 20 20 20 20 |der.pref| |
|00001d30| 20 20 20 20 20 20 20 20 | 20 50 72 65 66 65 72 65 | | Prefere|
|00001d40| 6e 63 65 73 0d 70 72 6e | 74 20 20 20 20 20 20 20 |nces.prn|t |
|00001d50| 20 20 20 20 20 20 20 20 | 20 20 50 72 69 6e 74 4d | | PrintM|
|00001d60| 6f 6e 69 74 6f 72 20 53 | 70 6f 6f 6c 0d 73 74 72 |onitor S|pool.str|
|00001d70| 74 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |t | |
|00001d80| 20 20 53 74 61 72 74 75 | 70 20 49 74 65 6d 73 0d | Startu|p Items.|
|00001d90| 74 65 6d 70 20 20 20 20 | 20 20 20 20 20 20 20 20 |temp | |
|00001da0| 20 20 20 20 54 65 6d 70 | 6f 72 61 72 79 20 49 74 | Temp|orary It|
|00001db0| 65 6d 73 0d 74 72 73 68 | 20 20 20 20 20 20 20 20 |ems.trsh| |
|00001dc0| 20 20 20 20 20 20 20 20 | 20 54 72 61 73 68 0d 0d | | Trash..|
|00001dd0| 41 6e 64 20 74 68 69 73 | 20 66 6f 6c 64 65 72 20 |And this| folder |
|00001de0| 74 79 70 65 20 69 73 20 | 6e 6f 72 6d 61 6c 6c 79 |type is |normally|
|00001df0| 20 69 6e 73 74 61 6c 6c | 65 64 20 73 69 6e 63 65 | install|ed since|
|00001e00| 20 53 79 73 74 65 6d 20 | 37 2e 31 3a 0d 0d 46 6f | System |7.1:..Fo|
|00001e10| 6c 64 65 72 20 74 79 70 | 65 3a 20 20 20 20 20 46 |lder typ|e: F|
|00001e20| 6f 6c 64 65 72 20 4e 61 | 6d 65 3a 20 20 20 20 20 |older Na|me: |
|00001e30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001e40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001e50| 20 20 20 20 20 20 20 20 | 0d 66 6f 6e 74 20 20 20 | |.font |
|00001e60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 46 | | F|
|00001e70| 6f 6e 74 73 0d 0d 53 6f | 6d 65 74 68 69 6e 67 20 |onts..So|mething |
|00001e80| 6c 69 6b 65 20 74 68 65 | 20 70 61 74 68 20 62 65 |like the| path be|
|00001e90| 6c 6f 77 20 77 6f 75 6c | 64 20 62 65 20 61 20 76 |low woul|d be a v|
|00001ea0| 61 6c 69 64 20 66 69 6c | 65 70 61 74 68 2c 20 75 |alid fil|epath, u|
|00001eb0| 6e 6c 65 73 73 20 6f 6e | 65 20 6f 66 20 74 68 65 |nless on|e of the|
|00001ec0| 20 65 6c 65 6d 65 6e 74 | 73 20 64 6f 65 73 6e 27 | element|s doesn'|
|00001ed0| 74 20 65 78 69 73 74 2c | 20 6f 72 20 61 6e 20 61 |t exist,| or an a|
|00001ee0| 6c 69 61 73 20 72 65 66 | 65 72 65 6e 63 65 73 20 |lias ref|erences |
|00001ef0| 74 6f 20 61 20 6e 6f 6e | 2d 65 78 69 73 74 69 6e |to a non|-existin|
|00001f00| 67 20 6f 62 6a 65 63 74 | 2c 20 6f 72 20 74 6f 20 |g object|, or to |
|00001f10| 61 20 66 69 6c 65 20 77 | 68 69 6c 65 20 61 20 66 |a file w|hile a f|
|00001f20| 6f 6c 64 65 72 20 69 73 | 20 65 78 70 65 63 74 65 |older is| expecte|
|00001f30| 64 3a 0d 0d 20 20 4d 61 | 63 69 6e 74 6f 73 68 20 |d:.. Ma|cintosh |
|00001f40| 48 44 3a 34 44 3a 53 65 | 63 6f 6e 64 20 44 69 73 |HD:4D:Se|cond Dis|
|00001f50| 6b 20 61 6c 69 61 73 3a | 53 6f 75 6e 64 3a 46 65 |k alias:|Sound:Fe|
|00001f60| 6d 61 6c 65 20 56 6f 69 | 63 65 0d 0d 54 68 69 73 |male Voi|ce..This|
|00001f70| 20 6f 6e 65 20 70 6f 69 | 6e 74 73 20 74 6f 20 74 | one poi|nts to t|
|00001f80| 68 65 20 73 74 61 72 74 | 75 70 20 66 6f 6c 64 65 |he start|up folde|
|00001f90| 72 20 6f 66 20 74 68 65 | 20 73 70 65 63 69 66 69 |r of the| specifi|
|00001fa0| 65 64 20 d3 4d 61 63 69 | 6e 74 6f 73 68 20 48 44 |ed .Maci|ntosh HD|
|00001fb0| d2 20 76 6f 6c 75 6d 65 | 3a 0d 0d 20 20 4d 61 63 |. volume|:.. Mac|
|00001fc0| 69 6e 74 6f 73 68 20 48 | 44 3a 73 74 72 74 3a 46 |intosh H|D:strt:F|
|00001fd0| 65 6d 61 6c 65 20 56 6f | 69 63 65 0d 0d 41 6e 64 |emale Vo|ice..And|
|00001fe0| 20 74 68 69 73 20 6f 6e | 65 20 74 6f 20 74 68 65 | this on|e to the|
|00001ff0| 20 73 74 61 72 74 75 70 | 20 69 74 65 6d 73 20 66 | startup| items f|
|00002000| 6f 6c 64 65 72 20 6f 66 | 20 74 68 65 20 63 75 72 |older of| the cur|
|00002010| 72 65 6e 74 20 73 79 73 | 74 65 6d 20 76 6f 6c 75 |rent sys|tem volu|
|00002020| 6d 65 20 77 68 69 6c 65 | 20 79 6f 75 20 64 6f 6e |me while| you don|
|00002030| 27 74 20 6e 65 65 64 20 | 74 6f 20 6b 6e 6f 77 20 |'t need |to know |
|00002040| 74 68 65 20 76 6f 6c 75 | 6d 65 20 6e 61 6d 65 20 |the volu|me name |
|00002050| 28 d3 4d 61 63 69 6e 74 | 6f 73 68 20 48 44 d2 29 |(.Macint|osh HD.)|
|00002060| 3a 0d 0d 20 20 73 74 72 | 74 3a 46 65 6d 61 6c 65 |:.. str|t:Female|
|00002070| 20 56 6f 69 63 65 0d 0d | 54 68 69 73 20 6f 6e 65 | Voice..|This one|
|00002080| 20 77 6f 75 6c 64 20 6c | 65 61 64 20 74 6f 20 74 | would l|ead to t|
|00002090| 68 65 20 73 61 6d 65 20 | 6c 6f 63 61 74 69 6f 6e |he same |location|
|000020a0| 3a 0d 0d 20 20 53 65 63 | 6f 6e 64 20 44 69 73 6b |:.. Sec|ond Disk|
|000020b0| 3a 64 65 73 6b 3a 4d 61 | 63 69 6e 74 6f 73 68 20 |:desk:Ma|cintosh |
|000020c0| 48 44 20 61 6c 69 61 73 | 3a 73 74 72 74 3a 46 65 |HD alias|:strt:Fe|
|000020d0| 6d 61 6c 65 20 56 6f 69 | 63 65 0d 0d 41 66 74 65 |male Voi|ce..Afte|
|000020e0| 72 20 74 68 65 20 d3 4d | 61 63 69 6e 74 6f 73 68 |r the .M|acintosh|
|000020f0| 20 48 44 20 61 6c 69 61 | 73 d2 20 69 73 20 72 65 | HD alia|s. is re|
|00002100| 73 6f 6c 76 65 64 20 79 | 6f 75 27 72 65 20 6f 6e |solved y|ou're on|
|00002110| 20 74 68 65 20 d3 4d 61 | 63 69 6e 74 6f 73 68 20 | the .Ma|cintosh |
|00002120| 48 44 d2 20 76 6f 6c 75 | 6d 65 20 61 6e 64 20 74 |HD. volu|me and t|
|00002130| 68 65 20 d3 73 74 72 74 | d2 20 66 6f 6c 64 65 72 |he .strt|. folder|
|00002140| 20 62 65 63 6f 6d 65 73 | 20 74 68 65 20 53 74 61 | becomes| the Sta|
|00002150| 72 74 75 70 20 49 74 65 | 6d 73 20 46 6f 6c 64 65 |rtup Ite|ms Folde|
|00002160| 72 20 6f 6e 20 74 68 61 | 74 20 76 6f 6c 75 6d 65 |r on tha|t volume|
|00002170| 2e 0d 42 75 74 20 74 6f | 20 65 78 70 6c 61 69 6e |..But to| explain|
|00002180| 20 74 68 69 73 20 6c 61 | 73 74 20 65 78 61 6d 70 | this la|st examp|
|00002190| 6c 65 20 69 6e 20 66 75 | 6c 6c 3a 20 4f 6e 20 74 |le in fu|ll: On t|
|000021a0| 68 65 20 d3 53 65 63 6f | 6e 64 20 44 69 73 6b d2 |he .Seco|nd Disk.|
|000021b0| 20 76 6f 6c 75 6d 65 20 | 69 73 20 69 6e 20 69 74 | volume |is in it|
|000021c0| 73 20 44 65 73 6b 74 6f | 70 20 46 6f 6c 64 65 72 |s Deskto|p Folder|
|000021d0| 20 28 d3 64 65 73 6b d2 | 29 20 61 6e 20 61 6c 69 | (.desk.|) an ali|
|000021e0| 61 73 20 70 72 65 73 65 | 6e 74 20 62 79 20 74 68 |as prese|nt by th|
|000021f0| 65 20 6e 61 6d 65 20 d3 | 4d 61 63 69 6e 74 6f 73 |e name .|Macintos|
|00002200| 68 20 48 44 20 61 6c 69 | 61 73 d2 2e 20 54 68 69 |h HD ali|as.. Thi|
|00002210| 73 20 61 6c 69 61 73 20 | 70 6f 69 6e 74 73 20 74 |s alias |points t|
|00002220| 6f 20 61 6e 79 20 66 69 | 6c 65 20 6f 72 20 66 6f |o any fi|le or fo|
|00002230| 6c 64 65 72 20 6f 6e 20 | 74 68 65 20 76 6f 6c 75 |lder on |the volu|
|00002240| 6d 65 20 d3 4d 61 63 69 | 6e 74 6f 73 68 20 48 44 |me .Maci|ntosh HD|
|00002250| d2 2c 20 62 75 74 20 70 | 72 6f 62 61 62 6c 79 20 |., but p|robably |
|00002260| 74 6f 20 74 68 65 20 64 | 69 73 6b 20 69 74 73 65 |to the d|isk itse|
|00002270| 6c 66 2e 20 53 69 6e 63 | 65 20 77 65 20 61 72 65 |lf. Sinc|e we are|
|00002280| 20 6e 6f 77 20 6f 6e 20 | 74 68 65 20 d3 4d 61 63 | now on |the .Mac|
|00002290| 69 6e 74 6f 73 68 20 48 | 44 d2 20 64 69 73 6b 20 |intosh H|D. disk |
|000022a0| 74 68 65 20 d3 73 74 72 | 74 d2 20 70 61 72 74 20 |the .str|t. part |
|000022b0| 70 6f 69 6e 74 73 20 74 | 6f 20 74 68 65 20 53 74 |points t|o the St|
|000022c0| 61 72 74 75 70 20 49 74 | 65 6d 73 20 66 6f 6c 64 |artup It|ems fold|
|000022d0| 65 72 20 6f 6e 20 74 68 | 61 74 20 64 69 73 6b 2c |er on th|at disk,|
|000022e0| 20 61 6e 64 20 74 68 61 | 74 27 73 20 77 65 72 65 | and tha|t's were|
|000022f0| 20 74 68 65 20 66 69 6c | 65 20 d3 46 65 6d 61 6c | the fil|e .Femal|
|00002300| 65 20 76 6f 69 63 65 d2 | 20 69 73 20 6c 6f 63 61 |e voice.| is loca|
|00002310| 74 65 64 20 28 6f 72 20 | 63 72 65 61 74 65 64 29 |ted (or |created)|
|00002320| 2e 0d 0d 0d 0d 00 00 00 | 01 20 00 00 00 16 00 01 |........|. ......|
|00002330| 00 00 00 00 00 0c 00 0a | 00 03 00 00 00 09 00 00 |........|........|
|00002340| 00 00 00 00 00 00 00 01 | 20 00 00 00 16 00 01 00 |........| .......|
|00002350| 00 00 00 00 0c 00 0a 00 | 03 00 00 00 09 00 00 00 |........|........|
|00002360| 00 00 00 00 00 00 01 20 | 00 00 00 16 00 01 00 00 |....... |........|
|00002370| 00 00 00 0c 00 0a 00 03 | 00 00 00 09 00 00 00 00 |........|........|
|00002380| 00 00 00 00 00 01 20 00 | 00 00 16 00 01 00 00 00 |...... .|........|
|00002390| 00 00 0c 00 0a 00 03 00 | 00 00 09 00 00 00 00 00 |........|........|
|000023a0| 00 00 00 01 27 53 50 20 | 53 50 45 45 43 48 20 4f |....'SP |SPEECH O|
|000023b0| 4e 0d 0d 45 6e 61 62 6c | 65 73 20 53 70 65 65 63 |N..Enabl|es Speec|
|000023c0| 68 20 50 61 63 6b 20 61 | 66 74 65 72 20 69 74 20 |h Pack a|fter it |
|000023d0| 77 61 73 20 64 69 73 61 | 62 6c 65 64 20 62 79 20 |was disa|bled by |
|000023e0| 75 73 69 6e 67 20 53 50 | 20 53 50 45 45 43 48 20 |using SP| SPEECH |
|000023f0| 4f 46 46 2e 0d 0d 54 68 | 69 73 20 63 6f 6d 6d 61 |OFF...Th|is comma|
|00002400| 6e 64 20 69 73 20 63 6f | 6d 70 6c 65 6d 65 6e 74 |nd is co|mplement|
|00002410| 61 6c 20 74 6f 20 74 68 | 65 20 53 50 20 53 50 45 |al to th|e SP SPE|
|00002420| 45 43 48 20 4f 46 46 20 | 63 6f 6d 6d 61 6e 64 20 |ECH OFF |command |
|00002430| 61 6e 64 20 65 6e 61 62 | 6c 65 73 20 53 70 65 65 |and enab|les Spee|
|00002440| 63 68 20 50 61 63 6b 20 | 61 67 61 69 6e 2e 20 41 |ch Pack |again. A|
|00002450| 66 74 65 72 20 74 68 69 | 73 20 61 6c 6c 20 66 75 |fter thi|s all fu|
|00002460| 6e 63 74 69 6f 6e 73 20 | 61 72 65 20 6e 6f 72 6d |nctions |are norm|
|00002470| 61 6c 6c 79 20 61 76 61 | 69 6c 61 62 6c 65 20 61 |ally ava|ilable a|
|00002480| 67 61 69 6e 2c 20 6a 75 | 73 74 20 61 73 20 74 68 |gain, ju|st as th|
|00002490| 65 79 20 77 65 72 65 20 | 77 68 65 6e 20 74 68 65 |ey were |when the|
|000024a0| 20 64 61 74 61 2d 62 61 | 73 65 20 6f 70 65 6e 65 | data-ba|se opene|
|000024b0| 64 2e 0d 0d 45 78 61 6d | 70 6c 65 3a 0d 20 20 53 |d...Exam|ple:. S|
|000024c0| 50 20 53 50 45 45 43 48 | 20 4f 4e 0d 00 00 00 01 |P SPEECH| ON.....|
|000024d0| 20 00 00 00 16 00 01 00 | 00 00 00 00 0c 00 0a 00 | .......|........|
|000024e0| 03 00 00 00 09 00 00 00 | 00 00 00 00 00 02 78 53 |........|......xS|
|000024f0| 50 20 56 45 52 53 49 4f | 4e 20 28 76 65 72 73 69 |P VERSIO|N (versi|
|00002500| 6f 6e 6d 67 72 3b 20 76 | 65 72 73 69 6f 6e 70 63 |onmgr; v|ersionpc|
|00002510| 6b 29 0d 0d 76 65 72 73 | 69 6f 6e 6d 67 72 20 73 |k)..vers|ionmgr s|
|00002520| 74 72 69 6e 67 20 28 31 | 35 29 20 63 6f 6e 74 61 |tring (1|5) conta|
|00002530| 69 6e 73 20 6f 6e 20 72 | 65 74 75 72 6e 20 74 68 |ins on r|eturn th|
|00002540| 65 20 76 65 72 73 69 6f | 6e 20 6e 75 6d 62 65 72 |e versio|n number|
|00002550| 20 6f 66 20 74 68 65 0d | 20 20 20 20 20 20 20 20 | of the.| |
|00002560| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002570| 20 20 20 20 20 20 20 20 | 20 20 20 20 69 6e 73 74 | | inst|
|00002580| 61 6c 6c 65 64 20 53 70 | 65 65 63 68 20 4d 61 6e |alled Sp|eech Man|
|00002590| 61 67 65 72 20 73 6f 66 | 74 77 61 72 65 2e 0d 76 |ager sof|tware..v|
|000025a0| 65 72 73 69 6f 6e 70 63 | 6b 20 20 73 74 72 69 6e |ersionpc|k strin|
|000025b0| 67 20 28 31 35 29 20 63 | 6f 6e 74 61 69 6e 73 20 |g (15) c|ontains |
|000025c0| 6f 6e 20 72 65 74 75 72 | 6e 20 74 68 65 20 76 65 |on retur|n the ve|
|000025d0| 72 73 69 6f 6e 20 6e 75 | 6d 62 65 72 20 6f 66 20 |rsion nu|mber of |
|000025e0| 74 68 65 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |the. | |
|000025f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002600| 20 20 20 20 20 20 20 20 | 69 6e 73 74 61 6c 6c 65 | |installe|
|00002610| 64 20 53 70 65 65 63 68 | 20 50 61 63 6b 20 65 78 |d Speech| Pack ex|
|00002620| 74 65 72 6e 61 6c 20 70 | 61 63 6b 61 67 65 2e 0d |ternal p|ackage..|
|00002630| 0d 52 65 74 75 72 6e 73 | 20 74 68 65 20 76 65 72 |.Returns| the ver|
|00002640| 73 69 6f 6e 73 20 6f 66 | 20 74 68 65 20 53 70 65 |sions of| the Spe|
|00002650| 65 63 68 20 4d 61 6e 61 | 67 65 72 20 73 6f 66 74 |ech Mana|ger soft|
|00002660| 77 61 72 65 20 61 6e 64 | 20 74 68 65 20 53 70 65 |ware and| the Spe|
|00002670| 65 63 68 20 50 61 63 6b | 20 65 78 74 65 72 6e 61 |ech Pack| externa|
|00002680| 6c 20 70 61 63 6b 61 67 | 65 2e 0d 0d 49 66 20 74 |l packag|e...If t|
|00002690| 68 65 20 53 70 65 65 63 | 68 20 4d 61 6e 61 67 65 |he Speec|h Manage|
|000026a0| 72 20 69 73 20 6e 6f 74 | 20 69 6e 73 74 61 6c 6c |r is not| install|
|000026b0| 65 64 20 74 68 65 20 d3 | 76 65 72 73 69 6f 6e 6d |ed the .|versionm|
|000026c0| 67 72 d2 20 70 61 72 61 | 6d 65 74 65 72 20 77 69 |gr. para|meter wi|
|000026d0| 6c 6c 20 72 65 74 75 72 | 6e 20 61 6e 20 65 6d 70 |ll retur|n an emp|
|000026e0| 74 79 20 73 74 72 69 6e | 67 2c 20 72 65 67 61 72 |ty strin|g, regar|
|000026f0| 64 6c 65 73 73 20 6f 66 | 20 74 68 65 20 66 61 63 |dless of| the fac|
|00002700| 74 20 69 66 20 74 68 65 | 20 6f 74 68 65 72 20 53 |t if the| other S|
|00002710| 70 65 65 63 68 20 50 61 | 63 6b 20 66 75 6e 63 74 |peech Pa|ck funct|
|00002720| 69 6f 6e 73 20 61 72 65 | 20 61 76 61 69 6c 61 62 |ions are| availab|
|00002730| 6c 65 20 6f 72 20 6e 6f | 74 2e 0d 0d 45 78 61 6d |le or no|t...Exam|
|00002740| 70 6c 65 3a 0d 20 20 53 | 50 20 56 45 52 53 49 4f |ple:. S|P VERSIO|
|00002750| 4e 20 28 24 6d 67 72 76 | 65 72 73 3b 24 70 61 63 |N ($mgrv|ers;$pac|
|00002760| 6b 76 65 72 73 29 0d 00 | 00 00 01 20 00 00 00 16 |kvers)..|... ....|
|00002770| 00 01 00 00 00 00 00 0c | 00 0a 00 03 00 00 00 09 |........|........|
|00002780| 00 00 00 00 00 00 00 00 | 00 01 20 00 00 00 16 00 |........|.. .....|
|00002790| 01 00 00 00 00 00 0c 00 | 0a 00 03 00 00 00 09 00 |........|........|
|000027a0| 00 00 00 00 00 00 00 27 | b9 51 75 61 6c 69 74 79 |.......'|.Quality|
|000027b0| 20 54 65 73 74 0d 0d 60 | 74 68 69 73 20 69 73 20 | Test..`|this is |
|000027c0| 74 68 65 20 70 72 6f 63 | 65 64 75 72 65 20 75 73 |the proc|edure us|
|000027d0| 65 64 20 74 6f 20 74 65 | 73 74 20 74 68 65 20 53 |ed to te|st the S|
|000027e0| 70 65 65 63 68 20 50 61 | 63 6b 20 65 78 74 65 72 |peech Pa|ck exter|
|000027f0| 6e 61 6c 0d 60 62 65 73 | 69 64 65 20 74 68 69 73 |nal.`bes|ide this|
|00002800| 20 70 72 6f 63 65 64 75 | 72 65 20 74 68 65 72 65 | procedu|re there|
|00002810| 20 61 72 65 20 74 77 6f | 20 6f 74 68 65 72 73 20 | are two| others |
|00002820| 69 6e 63 6c 75 64 65 64 | 3a 20 44 6f 45 72 72 6f |included|: DoErro|
|00002830| 72 20 61 6e 64 20 44 6f | 57 61 69 74 56 6f 69 63 |r and Do|WaitVoic|
|00002840| 65 0d 0d 60 62 65 66 6f | 72 65 20 72 65 6c 65 61 |e..`befo|re relea|
|00002850| 73 65 20 6f 66 20 74 68 | 69 73 20 76 65 72 73 69 |se of th|is versi|
|00002860| 6f 6e 20 6f 66 20 53 70 | 65 65 63 68 20 50 61 63 |on of Sp|eech Pac|
|00002870| 6b 20 74 68 69 73 20 70 | 72 6f 63 65 64 75 72 65 |k this p|rocedure|
|00002880| 20 6d 75 73 74 20 68 61 | 76 65 0d 60 62 65 65 6e | must ha|ve.`been|
|00002890| 20 65 78 65 63 75 74 65 | 64 20 73 75 63 63 65 73 | execute|d succes|
|000028a0| 66 75 6c 6c 79 20 77 69 | 74 68 20 61 74 20 6c 65 |fully wi|th at le|
|000028b0| 61 73 74 20 74 68 65 73 | 65 20 63 6f 6e 66 69 67 |ast thes|e config|
|000028c0| 75 72 61 74 69 6f 6e 73 | 3a 0d 60 4d 61 63 69 6e |urations|:.`Macin|
|000028d0| 74 6f 73 68 20 49 49 78 | 20 38 2f 31 34 30 2c 20 |tosh IIx| 8/140, |
|000028e0| 53 79 73 74 65 6d 20 37 | 2e 31 20 55 53 2c 20 34 |System 7|.1 US, 4|
|000028f0| 44 20 32 2e 32 2e 33 0d | 60 4d 61 63 69 6e 74 6f |D 2.2.3.|`Macinto|
|00002900| 73 68 20 50 6f 77 65 72 | 42 6f 6f 6b 20 44 75 6f |sh Power|Book Duo|
|00002910| 20 32 31 30 2c 20 53 79 | 73 74 65 6d 20 37 2e 31 | 210, Sy|stem 7.1|
|00002920| 20 55 53 2c 20 34 44 20 | 33 2e 30 2e 35 0d 60 4d | US, 4D |3.0.5.`M|
|00002930| 61 63 69 6e 74 6f 73 68 | 20 49 49 78 20 38 2f 31 |acintosh| IIx 8/1|
|00002940| 34 30 2c 20 53 79 73 74 | 65 6d 20 36 2e 30 2e 38 |40, Syst|em 6.0.8|
|00002950| 20 49 6e 74 2c 20 34 44 | 20 32 2e 32 2e 33 0d 60 | Int, 4D| 2.2.3.`|
|00002960| 4d 61 63 69 6e 74 6f 73 | 68 20 49 49 78 20 38 2f |Macintos|h IIx 8/|
|00002970| 31 34 30 2c 20 53 79 73 | 74 65 6d 20 37 2e 31 20 |140, Sys|tem 7.1 |
|00002980| 55 53 2c 20 34 44 20 33 | 2e 30 2e 35 0d 60 4d 61 |US, 4D 3|.0.5.`Ma|
|00002990| 63 69 6e 74 6f 73 68 20 | 50 6c 75 73 20 34 2f 32 |cintosh |Plus 4/2|
|000029a0| 30 2c 20 53 79 73 74 65 | 6d 20 36 2e 30 2e 38 20 |0, Syste|m 6.0.8 |
|000029b0| 49 6e 74 2c 20 34 44 20 | 53 65 72 76 65 72 20 44 |Int, 4D |Server D|
|000029c0| 65 6d 6f 20 31 2e 30 2e | 35 0d 60 20 20 61 6e 64 |emo 1.0.|5.` and|
|000029d0| 20 4d 61 63 69 6e 74 6f | 73 68 20 49 49 78 20 38 | Macinto|sh IIx 8|
|000029e0| 2f 31 34 30 2c 20 53 79 | 73 74 65 6d 20 37 2e 31 |/140, Sy|stem 7.1|
|000029f0| 20 55 53 2c 20 34 44 20 | 43 6c 69 65 6e 74 20 44 | US, 4D |Client D|
|00002a00| 65 6d 6f 20 31 2e 30 2e | 35 0d 60 61 6c 6c 20 75 |emo 1.0.|5.`all u|
|00002a10| 73 69 6e 67 20 74 68 65 | 20 6c 61 74 65 73 74 20 |sing the| latest |
|00002a20| 61 76 61 69 6c 61 62 6c | 65 20 76 65 72 73 69 6f |availabl|e versio|
|00002a30| 6e 20 6f 66 20 53 70 65 | 65 63 68 20 4d 61 6e 61 |n of Spe|ech Mana|
|00002a40| 67 65 72 20 61 6e 64 20 | 50 6c 61 69 6e 54 61 6c |ger and |PlainTal|
|00002a50| 6b 0d 60 65 61 63 68 20 | 66 75 6e 63 74 69 6f 6e |k.`each |function|
|00002a60| 20 68 61 73 20 62 65 65 | 6e 20 74 65 73 74 65 64 | has bee|n tested|
|00002a70| 20 6d 6f 72 65 20 65 78 | 74 65 6e 73 69 76 65 6c | more ex|tensivel|
|00002a80| 79 20 64 75 72 69 6e 67 | 20 64 65 76 65 6c 6f 70 |y during| develop|
|00002a90| 6d 65 6e 74 0d 0d 60 64 | 65 63 6c 61 72 61 74 69 |ment..`d|eclarati|
|00002aa0| 6f 6e 73 20 66 72 6f 6d | 20 74 68 65 20 53 70 65 |ons from| the Spe|
|00002ab0| 65 63 68 20 50 61 63 6b | 20 4c 61 6e 67 75 61 67 |ech Pack| Languag|
|00002ac0| 65 20 52 65 66 65 72 65 | 6e 63 65 3a 0d 43 5f 49 |e Refere|nce:.C_I|
|00002ad0| 4e 54 45 47 45 52 28 24 | 65 72 72 3b 24 73 70 65 |NTEGER($|err;$spe|
|00002ae0| 65 63 68 72 65 66 3b 24 | 70 72 65 73 65 6e 74 3b |echref;$|present;|
|00002af0| 24 63 6f 75 6e 74 3b 24 | 72 61 74 65 3b 24 70 69 |$count;$|rate;$pi|
|00002b00| 74 63 68 3b 24 69 29 0d | 43 5f 49 4e 54 45 47 45 |tch;$i).|C_INTEGE|
|00002b10| 52 28 24 67 65 6e 64 65 | 72 3b 24 61 67 65 3b 24 |R($gende|r;$age;$|
|00002b20| 6c 61 6e 67 75 61 67 65 | 3b 24 72 65 67 69 6f 6e |language|;$region|
|00002b30| 3b 24 73 63 72 69 70 74 | 29 0d 43 5f 4c 4f 4e 47 |;$script|).C_LONG|
|00002b40| 49 4e 54 28 24 6d 6f 64 | 75 6c 29 0d 43 5f 53 54 |INT($mod|ul).C_ST|
|00002b50| 52 49 4e 47 28 34 3b 24 | 63 72 65 61 74 6f 72 3b |RING(4;$|creator;|
|00002b60| 24 69 64 29 0d 43 5f 53 | 54 52 49 4e 47 28 31 35 |$id).C_S|TRING(15|
|00002b70| 3b 24 6d 67 72 76 65 72 | 73 3b 24 70 61 63 6b 76 |;$mgrver|s;$packv|
|00002b80| 65 72 73 29 0d 43 5f 53 | 54 52 49 4e 47 28 36 33 |ers).C_S|TRING(63|
|00002b90| 3b 24 76 6f 69 63 65 6e | 61 6d 65 29 0d 43 5f 53 |;$voicen|ame).C_S|
|00002ba0| 54 52 49 4e 47 28 32 35 | 35 3b 24 63 6f 6d 6d 65 |TRING(25|5;$comme|
|00002bb0| 6e 74 3b 24 6d 65 73 73 | 61 67 65 3b 24 70 68 6f |nt;$mess|age;$pho|
|00002bc0| 6e 65 6d 65 3b 24 70 61 | 74 68 29 0d 0d 60 61 64 |neme;$pa|th)..`ad|
|00002bd0| 64 69 74 69 6f 6e 61 6c | 20 64 65 63 6c 61 72 61 |ditional| declara|
|00002be0| 74 69 6f 6e 73 20 66 6f | 72 20 75 73 65 20 69 6e |tions fo|r use in|
|00002bf0| 20 74 68 69 73 20 70 72 | 6f 63 65 64 75 72 65 0d | this pr|ocedure.|
|00002c00| 43 5f 49 4e 54 45 47 45 | 52 28 24 6f 72 67 5f 72 |C_INTEGE|R($org_r|
|00002c10| 61 74 65 3b 24 6f 72 67 | 5f 70 69 74 63 68 29 0d |ate;$org|_pitch).|
|00002c20| 43 5f 53 54 52 49 4e 47 | 28 32 35 35 3b 24 74 65 |C_STRING|(255;$te|
|00002c30| 73 74 5f 73 74 72 3b 24 | 61 6c 65 72 74 29 0d 43 |st_str;$|alert).C|
|00002c40| 5f 54 45 58 54 28 24 74 | 65 73 74 5f 74 78 74 29 |_TEXT($t|est_txt)|
|00002c50| 0d 41 52 52 41 59 20 54 | 45 58 54 28 53 70 65 65 |.ARRAY T|EXT(Spee|
|00002c60| 63 68 41 72 72 61 79 3b | 30 29 0d 0d 24 74 65 73 |chArray;|0)..$tes|
|00002c70| 74 5f 73 74 72 3a 3d 22 | 54 65 73 74 69 6e 67 20 |t_str:="|Testing |
|00002c80| 53 70 65 65 63 68 20 4d | 61 6e 61 67 65 72 20 31 |Speech M|anager 1|
|00002c90| 2e 32 2e 33 22 0d 24 74 | 65 73 74 5f 74 78 74 3a |.2.3".$t|est_txt:|
|00002ca0| 3d 22 48 65 6c 6c 6f 2c | 20 79 6f 75 20 61 72 65 |="Hello,| you are|
|00002cb0| 20 6e 6f 77 20 74 65 73 | 74 69 6e 67 20 53 70 65 | now tes|ting Spe|
|00002cc0| 65 63 68 20 50 61 63 6b | 20 61 6e 64 20 74 68 65 |ech Pack| and the|
|00002cd0| 20 53 70 65 65 63 68 20 | 4d 61 6e 61 67 65 72 20 | Speech |Manager |
|00002ce0| 6f 6e 20 79 6f 75 72 20 | 4d 61 63 69 6e 74 6f 73 |on your |Macintos|
|00002cf0| 68 22 0d 0d 60 67 65 74 | 20 63 6f 70 79 72 69 67 |h"..`get| copyrig|
|00002d00| 68 74 20 6d 65 73 73 61 | 67 65 0d 53 50 20 43 4f |ht messa|ge.SP CO|
|00002d10| 50 59 52 49 47 48 54 20 | 28 24 6d 65 73 73 61 67 |PYRIGHT |($messag|
|00002d20| 65 29 0d 0d 60 67 65 74 | 20 76 65 72 73 69 6f 6e |e)..`get| version|
|00002d30| 20 6e 75 6d 62 65 72 73 | 20 6f 66 20 53 70 65 65 | numbers| of Spee|
|00002d40| 63 68 20 4d 67 72 20 61 | 6e 64 20 53 70 65 65 63 |ch Mgr a|nd Speec|
|00002d50| 68 20 50 61 63 6b 0d 53 | 50 20 56 45 52 53 49 4f |h Pack.S|P VERSIO|
|00002d60| 4e 20 28 24 6d 67 72 76 | 65 72 73 3b 24 70 61 63 |N ($mgrv|ers;$pac|
|00002d70| 6b 76 65 72 73 29 0d 0d | 60 63 6f 6d 70 6f 73 65 |kvers)..|`compose|
|00002d80| 20 74 65 78 74 20 74 6f | 20 64 69 73 70 6c 61 79 | text to| display|
|00002d90| 0d 60 69 66 20 24 6d 67 | 72 76 65 72 73 20 69 73 |.`if $mg|rvers is|
|00002da0| 20 65 6d 70 74 79 20 74 | 68 65 20 53 70 65 65 63 | empty t|he Speec|
|00002db0| 68 20 4d 67 72 20 69 73 | 20 6e 6f 74 20 69 6e 73 |h Mgr is| not ins|
|00002dc0| 74 61 6c 6c 65 64 0d 24 | 61 6c 65 72 74 3a 3d 24 |talled.$|alert:=$|
|00002dd0| 61 6c 65 72 74 2b 22 53 | 70 65 65 63 68 20 4d 61 |alert+"S|peech Ma|
|00002de0| 6e 61 67 65 72 3a 20 22 | 2b 28 24 6d 67 72 76 65 |nager: "|+($mgrve|
|00002df0| 72 73 2a 4e 75 6d 28 24 | 6d 67 72 76 65 72 73 23 |rs*Num($|mgrvers#|
|00002e00| 22 22 29 29 2b 28 22 4e | 2f 41 22 2a 4e 75 6d 28 |""))+("N|/A"*Num(|
|00002e10| 24 6d 67 72 76 65 72 73 | 3d 22 22 29 29 2b 43 68 |$mgrvers|=""))+Ch|
|00002e20| 61 72 28 31 33 29 0d 24 | 61 6c 65 72 74 3a 3d 24 |ar(13).$|alert:=$|
|00002e30| 61 6c 65 72 74 2b 22 34 | 44 20 53 70 65 65 63 68 |alert+"4|D Speech|
|00002e40| 20 50 61 63 6b 3a 20 22 | 2b 24 70 61 63 6b 76 65 | Pack: "|+$packve|
|00002e50| 72 73 2b 28 32 2a 43 68 | 61 72 28 31 33 29 29 0d |rs+(2*Ch|ar(13)).|
|00002e60| 24 61 6c 65 72 74 3a 3d | 24 61 6c 65 72 74 2b 24 |$alert:=|$alert+$|
|00002e70| 6d 65 73 73 61 67 65 0d | 0d 60 64 69 73 70 6c 61 |message.|.`displa|
|00002e80| 79 20 74 65 78 74 20 6f | 6e 20 73 63 72 65 65 6e |y text o|n screen|
|00002e90| 0d 41 4c 45 52 54 28 24 | 61 6c 65 72 74 29 0d 0d |.ALERT($|alert)..|
|00002ea0| 24 63 6f 75 6e 74 3a 3d | 30 0d 46 6f 72 20 28 24 |$count:=|0.For ($|
|00002eb0| 69 3b 30 3b 33 31 29 0d | 20 20 24 63 6f 75 6e 74 |i;0;31).| $count|
|00002ec0| 3a 3d 24 63 6f 75 6e 74 | 2b 53 50 20 46 65 61 74 |:=$count|+SP Feat|
|00002ed0| 75 72 65 73 20 28 24 69 | 29 0d 45 6e 64 20 66 6f |ures ($i|).End fo|
|00002ee0| 72 20 0d 49 66 20 28 24 | 63 6f 75 6e 74 23 36 29 |r .If ($|count#6)|
|00002ef0| 0d 20 20 44 6f 45 72 72 | 6f 72 20 28 24 63 6f 75 |. DoErr|or ($cou|
|00002f00| 6e 74 3b 22 49 6e 63 6f | 72 72 65 63 74 20 6e 75 |nt;"Inco|rrect nu|
|00002f10| 6d 62 65 72 20 6f 66 20 | 66 65 61 74 75 72 65 66 |mber of |featuref|
|00002f20| 6c 61 67 73 20 73 65 74 | 2e 22 29 0d 45 6e 64 20 |lags set|.").End |
|00002f30| 69 66 20 0d 0d 24 70 72 | 65 73 65 6e 74 3a 3d 53 |if ..$pr|esent:=S|
|00002f40| 50 20 43 61 6e 20 73 70 | 65 61 6b 20 0d 0d 49 66 |P Can sp|eak ..If|
|00002f50| 20 28 24 70 72 65 73 65 | 6e 74 3e 30 29 0d 20 20 | ($prese|nt>0). |
|00002f60| 0d 20 20 60 74 65 73 74 | 20 74 68 65 20 51 75 69 |. `test| the Qui|
|00002f70| 63 6b 20 53 70 65 61 6b | 20 66 75 6e 63 74 69 6f |ck Speak| functio|
|00002f80| 6e 73 0d 20 20 24 76 6f | 69 63 65 6e 61 6d 65 3a |ns. $vo|icename:|
|00002f90| 3d 22 2a 22 60 75 73 69 | 6e 67 20 74 68 65 20 64 |="*"`usi|ng the d|
|00002fa0| 65 66 61 75 6c 74 20 6e | 6f 72 6d 61 6c 20 76 6f |efault n|ormal vo|
|00002fb0| 69 63 65 0d 20 20 24 65 | 72 72 3a 3d 53 50 20 53 |ice. $e|rr:=SP S|
|00002fc0| 70 65 61 6b 20 53 74 72 | 69 6e 67 20 28 24 76 6f |peak Str|ing ($vo|
|00002fd0| 69 63 65 6e 61 6d 65 3b | 24 74 65 73 74 5f 73 74 |icename;|$test_st|
|00002fe0| 72 29 0d 20 20 44 6f 45 | 72 72 6f 72 20 28 24 65 |r). DoE|rror ($e|
|00002ff0| 72 72 3b 22 22 29 0d 20 | 20 24 65 72 72 3a 3d 53 |rr;""). | $err:=S|
|00003000| 50 20 53 70 65 61 6b 20 | 54 65 78 74 20 28 24 76 |P Speak |Text ($v|
|00003010| 6f 69 63 65 6e 61 6d 65 | 3b 24 74 65 73 74 5f 74 |oicename|;$test_t|
|00003020| 78 74 3b 31 3b 31 29 0d | 20 20 44 6f 45 72 72 6f |xt;1;1).| DoErro|
|00003030| 72 20 28 24 65 72 72 3b | 22 22 29 0d 20 20 0d 20 |r ($err;|""). . |
|00003040| 20 24 76 6f 69 63 65 6e | 61 6d 65 3a 3d 22 23 22 | $voicen|ame:="#"|
|00003050| 60 75 73 69 6e 67 20 74 | 68 65 20 64 65 66 61 75 |`using t|he defau|
|00003060| 6c 74 20 72 6f 62 6f 74 | 20 76 6f 69 63 65 0d 20 |lt robot| voice. |
|00003070| 20 24 65 72 72 3a 3d 53 | 50 20 53 70 65 61 6b 20 | $err:=S|P Speak |
|00003080| 53 74 72 69 6e 67 20 28 | 24 76 6f 69 63 65 6e 61 |String (|$voicena|
|00003090| 6d 65 3b 24 74 65 73 74 | 5f 73 74 72 29 0d 20 20 |me;$test|_str). |
|000030a0| 44 6f 45 72 72 6f 72 20 | 28 24 65 72 72 3b 22 22 |DoError |($err;""|
|000030b0| 29 0d 20 20 24 65 72 72 | 3a 3d 53 50 20 53 70 65 |). $err|:=SP Spe|
|000030c0| 61 6b 20 54 65 78 74 20 | 28 24 76 6f 69 63 65 6e |ak Text |($voicen|
|000030d0| 61 6d 65 3b 24 74 65 73 | 74 5f 74 78 74 3b 31 3b |ame;$tes|t_txt;1;|
|000030e0| 31 29 0d 20 20 44 6f 45 | 72 72 6f 72 20 28 24 65 |1). DoE|rror ($e|
|000030f0| 72 72 3b 22 22 29 0d 20 | 20 0d 20 20 24 6d 65 73 |rr;""). | . $mes|
|00003100| 73 61 67 65 3a 3d 22 53 | 65 6c 65 63 74 20 61 20 |sage:="S|elect a |
|00003110| 76 6f 69 63 65 20 66 6f | 72 20 74 65 73 74 69 6e |voice fo|r testin|
|00003120| 67 3a 22 0d 20 20 24 76 | 6f 69 63 65 6e 61 6d 65 |g:". $v|oicename|
|00003130| 3a 3d 22 2a 22 0d 20 20 | 24 72 61 74 65 3a 3d 30 |:="*". |$rate:=0|
|00003140| 0d 20 20 24 70 69 74 63 | 68 3a 3d 30 0d 20 20 24 |. $pitc|h:=0. $|
|00003150| 6d 6f 64 75 6c 3a 3d 2d | 31 0d 20 20 24 65 72 72 |modul:=-|1. $err|
|00003160| 3a 3d 53 50 20 50 69 63 | 6b 20 56 6f 69 63 65 20 |:=SP Pic|k Voice |
|00003170| 28 30 3b 30 3b 24 6d 65 | 73 73 61 67 65 3b 24 76 |(0;0;$me|ssage;$v|
|00003180| 6f 69 63 65 6e 61 6d 65 | 3b 24 72 61 74 65 3b 24 |oicename|;$rate;$|
|00003190| 70 69 74 63 68 3b 24 6d | 6f 64 75 6c 3b 30 29 0d |pitch;$m|odul;0).|
|000031a0| 20 20 49 66 20 28 24 65 | 72 72 23 30 29 0d 20 20 | If ($e|rr#0). |
|000031b0| 20 20 24 76 6f 69 63 65 | 6e 61 6d 65 3a 3d 22 42 | $voice|name:="B|
|000031c0| 72 65 6e 64 61 22 0d 20 | 20 45 6e 64 20 69 66 20 |renda". | End if |
|000031d0| 0d 20 20 0d 20 20 24 65 | 72 72 3a 3d 53 50 20 53 |. . $e|rr:=SP S|
|000031e0| 70 65 61 6b 20 53 74 72 | 69 6e 67 20 28 24 76 6f |peak Str|ing ($vo|
|000031f0| 69 63 65 6e 61 6d 65 3b | 24 74 65 73 74 5f 73 74 |icename;|$test_st|
|00003200| 72 29 0d 20 20 44 6f 45 | 72 72 6f 72 20 28 24 65 |r). DoE|rror ($e|
|00003210| 72 72 3b 22 22 29 0d 20 | 20 24 65 72 72 3a 3d 53 |rr;""). | $err:=S|
|00003220| 50 20 53 70 65 61 6b 20 | 54 65 78 74 20 28 24 76 |P Speak |Text ($v|
|00003230| 6f 69 63 65 6e 61 6d 65 | 3b 24 74 65 73 74 5f 74 |oicename|;$test_t|
|00003240| 78 74 3b 31 3b 31 29 0d | 20 20 44 6f 45 72 72 6f |xt;1;1).| DoErro|
|00003250| 72 20 28 24 65 72 72 3b | 22 22 29 0d 20 20 24 65 |r ($err;|""). $e|
|00003260| 72 72 3a 3d 53 50 20 53 | 70 65 61 6b 20 54 65 78 |rr:=SP S|peak Tex|
|00003270| 74 20 28 24 76 6f 69 63 | 65 6e 61 6d 65 3b 24 74 |t ($voic|ename;$t|
|00003280| 65 73 74 5f 74 78 74 3b | 31 3b 36 29 0d 20 20 44 |est_txt;|1;6). D|
|00003290| 6f 45 72 72 6f 72 20 28 | 24 65 72 72 3b 22 22 29 |oError (|$err;"")|
|000032a0| 0d 20 20 0d 20 20 0d 20 | 20 60 74 65 73 74 20 74 |. . . | `test t|
|000032b0| 68 65 20 42 61 63 6b 57 | 61 72 64 20 43 6f 6d 70 |he BackW|ard Comp|
|000032c0| 61 74 69 62 69 6c 69 74 | 79 20 66 75 6e 63 74 69 |atibilit|y functi|
|000032d0| 6f 6e 73 0d 20 20 54 52 | 41 43 45 0d 20 20 53 61 |ons. TR|ACE. Sa|
|000032e0| 79 20 28 24 74 65 73 74 | 5f 73 74 72 3b 30 29 60 |y ($test|_str;0)`|
|000032f0| 75 73 65 20 6e 6f 72 6d | 61 6c 20 76 6f 69 63 65 |use norm|al voice|
|00003300| 2c 20 72 61 74 65 20 61 | 6e 64 20 70 69 74 63 68 |, rate a|nd pitch|
|00003310| 0d 20 20 53 61 79 20 28 | 24 74 65 73 74 5f 73 74 |. Say (|$test_st|
|00003320| 72 3b 31 29 60 75 73 65 | 20 72 6f 62 6f 74 20 76 |r;1)`use| robot v|
|00003330| 6f 69 63 65 20 61 6e 64 | 20 6e 6f 72 6d 61 6c 20 |oice and| normal |
|00003340| 72 61 74 65 20 61 6e 64 | 20 70 69 74 63 68 0d 20 |rate and| pitch. |
|00003350| 20 53 61 79 20 28 24 74 | 65 73 74 5f 73 74 72 3b | Say ($t|est_str;|
|00003360| 30 3b 31 34 30 3b 38 30 | 29 60 75 73 65 20 6e 6f |0;140;80|)`use no|
|00003370| 72 6d 61 6c 20 76 6f 69 | 63 65 20 62 75 74 20 6f |rmal voi|ce but o|
|00003380| 74 68 65 72 20 72 61 74 | 65 20 61 6e 64 20 70 69 |ther rat|e and pi|
|00003390| 74 63 68 0d 20 20 0d 20 | 20 50 41 52 4c 45 20 28 |tch. . | PARLE (|
|000033a0| 24 74 65 73 74 5f 73 74 | 72 29 0d 20 20 4e 4f 20 |$test_st|r). NO |
|000033b0| 54 52 41 43 45 0d 20 20 | 0d 20 20 60 74 72 79 20 |TRACE. |. `try |
|000033c0| 74 6f 20 6f 70 65 6e 20 | 61 6c 6c 20 76 6f 69 63 |to open |all voic|
|000033d0| 65 73 20 61 6e 64 20 6c | 65 74 20 74 68 65 6d 20 |es and l|et them |
|000033e0| 73 70 65 61 6b 20 61 74 | 20 74 68 65 20 73 61 6d |speak at| the sam|
|000033f0| 65 20 74 69 6d 65 0d 20 | 20 53 50 20 56 4f 49 43 |e time. | SP VOIC|
|00003400| 45 53 20 41 52 52 41 59 | 20 28 22 53 70 65 65 63 |ES ARRAY| ("Speec|
|00003410| 68 41 72 72 61 79 22 29 | 60 66 69 72 73 74 20 67 |hArray")|`first g|
|00003420| 65 74 20 74 68 65 20 61 | 72 72 61 79 20 77 69 74 |et the a|rray wit|
|00003430| 68 20 76 6f 69 63 65 6e | 61 6d 65 73 0d 20 20 24 |h voicen|ames. $|
|00003440| 63 6f 75 6e 74 3a 3d 53 | 69 7a 65 20 6f 66 20 61 |count:=S|ize of a|
|00003450| 72 72 61 79 28 53 70 65 | 65 63 68 41 72 72 61 79 |rray(Spe|echArray|
|00003460| 29 60 63 6f 75 6e 74 20 | 74 68 65 20 6e 75 6d 62 |)`count |the numb|
|00003470| 65 72 20 6f 66 20 76 6f | 69 63 65 73 0d 20 20 0d |er of vo|ices. .|
|00003480| 20 20 41 4c 45 52 54 28 | 22 4e 6f 77 20 73 74 61 | ALERT(|"Now sta|
|00003490| 72 74 20 73 70 65 61 6b | 69 6e 67 20 77 69 74 68 |rt speak|ing with|
|000034a0| 20 61 6c 6c 20 76 6f 69 | 63 65 73 20 28 22 2b 53 | all voi|ces ("+S|
|000034b0| 74 72 69 6e 67 28 24 63 | 6f 75 6e 74 29 2b 22 29 |tring($c|ount)+")|
|000034c0| 20 69 66 20 70 6f 73 73 | 69 62 6c 65 c9 22 29 0d | if poss|ible.").|
|000034d0| 20 20 46 6f 72 20 28 24 | 69 3b 31 3b 24 63 6f 75 | For ($|i;1;$cou|
|000034e0| 6e 74 29 0d 20 20 20 20 | 24 65 72 72 3a 3d 53 50 |nt). |$err:=SP|
|000034f0| 20 4f 70 65 6e 20 56 6f | 69 63 65 20 28 53 70 65 | Open Vo|ice (Spe|
|00003500| 65 63 68 41 72 72 61 79 | 7b 24 69 7d 3b 24 73 70 |echArray|{$i};$sp|
|00003510| 65 65 63 68 72 65 66 29 | 0d 20 20 20 20 0d 20 20 |eechref)|. . |
|00003520| 20 20 49 66 20 28 24 69 | 3c 3d 31 30 29 26 28 24 | If ($i|<=10)&($|
|00003530| 65 72 72 3d 2d 32 34 31 | 29 0d 20 20 20 20 20 20 |err=-241|). |
|00003540| 44 6f 45 72 72 6f 72 20 | 28 24 65 72 72 3b 22 43 |DoError |($err;"C|
|00003550| 61 6e 27 74 20 6f 70 65 | 6e 20 31 30 20 63 68 61 |an't ope|n 10 cha|
|00003560| 6e 6e 65 6c 73 2c 20 6e | 6f 74 20 65 6e 6f 75 67 |nnels, n|ot enoug|
|00003570| 68 20 6d 65 6d 6f 72 79 | 3f 22 29 0d 20 20 20 20 |h memory|?"). |
|00003580| 45 6e 64 20 69 66 20 0d | 20 20 20 20 49 66 20 28 |End if .| If (|
|00003590| 24 69 3e 31 30 29 26 28 | 24 65 72 72 3d 30 29 0d |$i>10)&(|$err=0).|
|000035a0| 20 20 20 20 20 20 44 6f | 45 72 72 6f 72 20 28 24 | Do|Error ($|
|000035b0| 65 72 72 3b 22 43 61 6e | 20 6f 70 65 6e 20 6d 6f |err;"Can| open mo|
|000035c0| 72 65 20 74 68 61 6e 20 | 31 30 20 63 68 61 6e 6e |re than |10 chann|
|000035d0| 65 6c 73 3f 22 29 0d 20 | 20 20 20 45 6e 64 20 69 |els?"). | End i|
|000035e0| 66 20 0d 20 20 20 20 0d | 20 20 20 20 49 66 20 28 |f . .| If (|
|000035f0| 24 65 72 72 3d 30 29 0d | 20 20 20 20 20 20 24 65 |$err=0).| $e|
|00003600| 72 72 3a 3d 53 50 20 56 | 6f 69 63 65 20 54 65 78 |rr:=SP V|oice Tex|
|00003610| 74 20 28 24 73 70 65 65 | 63 68 72 65 66 3b 24 74 |t ($spee|chref;$t|
|00003620| 65 73 74 5f 74 78 74 3b | 31 3b 31 3b 34 29 60 70 |est_txt;|1;1;4)`p|
|00003630| 61 73 73 20 74 65 78 74 | 20 61 6e 64 20 70 61 75 |ass text| and pau|
|00003640| 73 65 20 62 65 66 6f 72 | 65 20 73 74 61 72 74 20 |se befor|e start |
|00003650| 73 70 65 65 63 68 0d 20 | 20 20 20 45 6e 64 20 69 |speech. | End i|
|00003660| 66 20 0d 20 20 45 6e 64 | 20 66 6f 72 20 0d 20 20 |f . End| for . |
|00003670| 24 65 72 72 3a 3d 53 50 | 20 56 6f 69 63 65 20 43 |$err:=SP| Voice C|
|00003680| 6f 6e 74 20 28 2d 31 29 | 60 6e 6f 77 20 63 6f 6e |ont (-1)|`now con|
|00003690| 74 69 6e 75 65 20 61 6c | 6c 20 76 6f 69 63 65 73 |tinue al|l voices|
|000036a0| 0d 20 20 57 68 69 6c 65 | 20 28 53 50 20 53 70 65 |. While| (SP Spe|
|000036b0| 61 6b 69 6e 67 20 3e 30 | 29 60 77 68 69 6c 65 20 |aking >0|)`while |
|000036c0| 61 6e 79 6f 6e 65 20 69 | 73 20 73 70 65 61 6b 69 |anyone i|s speaki|
|000036d0| 6e 67 20 77 61 69 74 20 | 66 6f 72 20 69 74 20 74 |ng wait |for it t|
|000036e0| 6f 20 66 69 6e 69 73 68 | 0d 20 20 20 20 49 44 4c |o finish|. IDL|
|000036f0| 45 0d 20 20 45 6e 64 20 | 77 68 69 6c 65 20 0d 20 |E. End |while . |
|00003700| 20 24 65 72 72 3a 3d 53 | 50 20 43 6c 6f 73 65 20 | $err:=S|P Close |
|00003710| 56 6f 69 63 65 20 28 2d | 31 29 60 63 6c 6f 73 65 |Voice (-|1)`close|
|00003720| 20 61 6c 6c 20 63 68 61 | 6e 6e 65 6c 73 0d 20 20 | all cha|nnels. |
|00003730| 0d 20 20 0d 20 20 60 74 | 65 73 74 20 74 68 65 20 |. . `t|est the |
|00003740| 6f 74 68 65 72 20 66 75 | 6e 63 74 69 6f 6e 73 20 |other fu|nctions |
|00003750| 69 6e 20 61 20 6c 6f 6f | 70 2c 20 6f 70 65 6e 69 |in a loo|p, openi|
|00003760| 6e 67 20 73 65 76 65 72 | 61 6c 20 73 70 65 65 63 |ng sever|al speec|
|00003770| 68 20 63 68 61 6e 6e 65 | 6c 73 0d 20 20 24 63 6f |h channe|ls. $co|
|00003780| 75 6e 74 3a 3d 53 50 20 | 43 6f 75 6e 74 20 76 6f |unt:=SP |Count vo|
|00003790| 69 63 65 73 20 0d 20 20 | 0d 20 20 46 6f 72 20 28 |ices . |. For (|
|000037a0| 24 69 3b 31 3b 24 63 6f | 75 6e 74 29 0d 20 20 20 |$i;1;$co|unt). |
|000037b0| 20 60 74 65 73 74 20 67 | 65 6e 65 72 61 6c 20 69 | `test g|eneral i|
|000037c0| 6e 66 6f 72 6d 61 74 69 | 6f 6e 20 72 6f 75 74 69 |nformati|on routi|
|000037d0| 6e 65 73 0d 20 20 20 20 | 24 65 72 72 3a 3d 53 50 |nes. |$err:=SP|
|000037e0| 20 56 6f 69 63 65 6e 61 | 6d 65 20 28 24 69 3b 24 | Voicena|me ($i;$|
|000037f0| 76 6f 69 63 65 6e 61 6d | 65 29 0d 20 20 20 20 24 |voicenam|e). $|
|00003800| 65 72 72 3a 3d 53 50 20 | 56 6f 69 63 65 20 49 6e |err:=SP |Voice In|
|00003810| 66 6f 20 28 24 76 6f 69 | 63 65 6e 61 6d 65 3b 24 |fo ($voi|cename;$|
|00003820| 63 6f 6d 6d 65 6e 74 3b | 24 67 65 6e 64 65 72 3b |comment;|$gender;|
|00003830| 24 61 67 65 29 0d 20 20 | 20 20 24 65 72 72 3a 3d |$age). | $err:=|
|00003840| 53 50 20 4c 61 6e 67 75 | 61 67 65 20 28 24 76 6f |SP Langu|age ($vo|
|00003850| 69 63 65 6e 61 6d 65 3b | 24 6c 61 6e 67 75 61 67 |icename;|$languag|
|00003860| 65 3b 24 72 65 67 69 6f | 6e 3b 24 73 63 72 69 70 |e;$regio|n;$scrip|
|00003870| 74 29 0d 20 20 20 20 0d | 20 20 20 20 60 63 6f 6d |t). .| `com|
|00003880| 70 6f 73 65 20 74 65 78 | 74 20 74 6f 20 64 69 73 |pose tex|t to dis|
|00003890| 70 6c 61 79 0d 20 20 20 | 20 24 61 6c 65 72 74 3a |play. | $alert:|
|000038a0| 3d 22 56 6f 69 63 65 3a | 20 22 2b 24 76 6f 69 63 |="Voice:| "+$voic|
|000038b0| 65 6e 61 6d 65 2b 28 32 | 2a 43 68 61 72 28 31 33 |ename+(2|*Char(13|
|000038c0| 29 29 0d 20 20 20 20 24 | 61 6c 65 72 74 3a 3d 24 |)). $|alert:=$|
|000038d0| 61 6c 65 72 74 2b 22 43 | 6f 6d 6d 65 6e 74 3a 20 |alert+"C|omment: |
|000038e0| 22 2b 24 63 6f 6d 6d 65 | 6e 74 2b 43 68 61 72 28 |"+$comme|nt+Char(|
|000038f0| 31 33 29 0d 20 20 20 20 | 24 61 6c 65 72 74 3a 3d |13). |$alert:=|
|00003900| 24 61 6c 65 72 74 2b 22 | 47 65 6e 64 65 72 3a 20 |$alert+"|Gender: |
|00003910| 22 2b 28 22 4e 65 75 74 | 65 72 22 2a 4e 75 6d 28 |"+("Neut|er"*Num(|
|00003920| 24 67 65 6e 64 65 72 3d | 30 29 29 2b 28 22 4d 61 |$gender=|0))+("Ma|
|00003930| 6c 65 22 2a 4e 75 6d 28 | 24 67 65 6e 64 65 72 3d |le"*Num(|$gender=|
|00003940| 31 29 29 2b 28 22 46 65 | 6d 61 6c 65 22 2a 4e 75 |1))+("Fe|male"*Nu|
|00003950| 6d 28 24 67 65 6e 64 65 | 72 3d 32 29 29 2b 43 68 |m($gende|r=2))+Ch|
|00003960| 61 72 28 31 33 29 0d 20 | 20 20 20 24 61 6c 65 72 |ar(13). | $aler|
|00003970| 74 3a 3d 24 61 6c 65 72 | 74 2b 22 41 67 65 3a 20 |t:=$aler|t+"Age: |
|00003980| 22 2b 53 74 72 69 6e 67 | 28 24 61 67 65 29 2b 22 |"+String|($age)+"|
|00003990| 20 79 65 61 72 22 2b 43 | 68 61 72 28 31 33 29 0d | year"+C|har(13).|
|000039a0| 20 20 20 20 49 66 20 28 | 24 6c 61 6e 67 75 61 67 | If (|$languag|
|000039b0| 65 23 30 29 7c 28 24 72 | 65 67 69 6f 6e 23 30 29 |e#0)|($r|egion#0)|
|000039c0| 7c 28 24 73 63 72 69 70 | 74 23 30 29 0d 20 20 20 ||($scrip|t#0). |
|000039d0| 20 20 20 24 61 6c 65 72 | 74 3a 3d 24 61 6c 65 72 | $aler|t:=$aler|
|000039e0| 74 2b 22 4c 61 6e 67 75 | 61 67 65 3a 20 22 2b 53 |t+"Langu|age: "+S|
|000039f0| 74 72 69 6e 67 28 24 6c | 61 6e 67 75 61 67 65 29 |tring($l|anguage)|
|00003a00| 2b 43 68 61 72 28 31 33 | 29 0d 20 20 20 20 20 20 |+Char(13|). |
|00003a10| 24 61 6c 65 72 74 3a 3d | 24 61 6c 65 72 74 2b 22 |$alert:=|$alert+"|
|00003a20| 52 65 67 69 6f 6e 3a 20 | 22 2b 53 74 72 69 6e 67 |Region: |"+String|
|00003a30| 28 24 6c 61 6e 67 75 61 | 67 65 29 2b 43 68 61 72 |($langua|ge)+Char|
|00003a40| 28 31 33 29 0d 20 20 20 | 20 20 20 24 61 6c 65 72 |(13). | $aler|
|00003a50| 74 3a 3d 24 61 6c 65 72 | 74 2b 22 53 63 72 69 70 |t:=$aler|t+"Scrip|
|00003a60| 74 3a 20 22 2b 53 74 72 | 69 6e 67 28 24 6c 61 6e |t: "+Str|ing($lan|
|00003a70| 67 75 61 67 65 29 2b 43 | 68 61 72 28 31 33 29 0d |guage)+C|har(13).|
|00003a80| 20 20 20 20 45 6e 64 20 | 69 66 20 0d 20 20 20 20 | End |if . |
|00003a90| 0d 20 20 20 20 60 64 69 | 73 70 6c 61 79 20 74 65 |. `di|splay te|
|00003aa0| 78 74 20 6f 6e 20 73 63 | 72 65 65 6e 0d 20 20 20 |xt on sc|reen. |
|00003ab0| 20 41 4c 45 52 54 28 24 | 61 6c 65 72 74 29 0d 20 | ALERT($|alert). |
|00003ac0| 20 20 20 0d 20 20 20 20 | 60 67 65 74 20 6d 6f 72 | . |`get mor|
|00003ad0| 65 20 69 6e 66 6f 0d 20 | 20 20 20 24 65 72 72 3a |e info. | $err:|
|00003ae0| 3d 53 50 20 56 6f 69 63 | 65 20 54 79 70 65 20 28 |=SP Voic|e Type (|
|00003af0| 24 76 6f 69 63 65 6e 61 | 6d 65 3b 24 63 72 65 61 |$voicena|me;$crea|
|00003b00| 74 6f 72 3b 24 69 64 3b | 24 70 61 74 68 29 0d 20 |tor;$id;|$path). |
|00003b10| 20 20 20 0d 20 20 20 20 | 60 63 6f 6d 70 6f 73 65 | . |`compose|
|00003b20| 20 74 65 78 74 20 74 6f | 20 64 69 73 70 6c 61 79 | text to| display|
|00003b30| 0d 20 20 20 20 24 61 6c | 65 72 74 3a 3d 22 56 6f |. $al|ert:="Vo|
|00003b40| 69 63 65 3a 20 22 2b 24 | 76 6f 69 63 65 6e 61 6d |ice: "+$|voicenam|
|00003b50| 65 2b 28 32 2a 43 68 61 | 72 28 31 33 29 29 0d 20 |e+(2*Cha|r(13)). |
|00003b60| 20 20 20 24 61 6c 65 72 | 74 3a 3d 24 61 6c 65 72 | $aler|t:=$aler|
|00003b70| 74 2b 22 43 72 65 61 74 | 6f 72 3a 20 22 2b 24 63 |t+"Creat|or: "+$c|
|00003b80| 72 65 61 74 6f 72 2b 43 | 68 61 72 28 31 33 29 0d |reator+C|har(13).|
|00003b90| 20 20 20 20 24 61 6c 65 | 72 74 3a 3d 24 61 6c 65 | $ale|rt:=$ale|
|00003ba0| 72 74 2b 22 49 44 3a 20 | 22 2b 24 69 64 2b 43 68 |rt+"ID: |"+$id+Ch|
|00003bb0| 61 72 28 31 33 29 0d 20 | 20 20 20 24 61 6c 65 72 |ar(13). | $aler|
|00003bc0| 74 3a 3d 24 61 6c 65 72 | 74 2b 22 44 61 74 61 20 |t:=$aler|t+"Data |
|00003bd0| 73 74 6f 72 65 64 20 69 | 6e 20 64 69 73 6b 20 66 |stored i|n disk f|
|00003be0| 69 6c 65 3a 22 2b 43 68 | 61 72 28 31 33 29 2b 24 |ile:"+Ch|ar(13)+$|
|00003bf0| 70 61 74 68 2b 43 68 61 | 72 28 31 33 29 0d 20 20 |path+Cha|r(13). |
|00003c00| 20 20 0d 20 20 20 20 60 | 64 69 73 70 6c 61 79 20 | . `|display |
|00003c10| 74 65 78 74 20 6f 6e 20 | 73 63 72 65 65 6e 0d 20 |text on |screen. |
|00003c20| 20 20 20 41 4c 45 52 54 | 28 24 61 6c 65 72 74 29 | ALERT|($alert)|
|00003c30| 0d 20 20 20 20 0d 20 20 | 20 20 24 65 72 72 3a 3d |. . | $err:=|
|00003c40| 53 50 20 4f 70 65 6e 20 | 56 6f 69 63 65 20 28 24 |SP Open |Voice ($|
|00003c50| 76 6f 69 63 65 6e 61 6d | 65 3b 24 73 70 65 65 63 |voicenam|e;$speec|
|00003c60| 68 72 65 66 29 0d 20 20 | 20 20 49 66 20 28 24 65 |href). | If ($e|
|00003c70| 72 72 3d 30 29 0d 20 20 | 20 20 20 20 0d 20 20 20 |rr=0). | . |
|00003c80| 20 20 20 24 65 72 72 3a | 3d 53 50 20 56 6f 69 63 | $err:|=SP Voic|
|00003c90| 65 20 53 74 72 69 6e 67 | 20 28 24 73 70 65 65 63 |e String| ($speec|
|00003ca0| 68 72 65 66 3b 22 3a 2d | 31 36 33 39 35 2c 30 22 |href;":-|16395,0"|
|00003cb0| 29 0d 20 20 20 20 20 20 | 44 6f 45 72 72 6f 72 20 |). |DoError |
|00003cc0| 28 24 65 72 72 3b 22 22 | 29 0d 20 20 20 20 20 20 |($err;""|). |
|00003cd0| 44 6f 57 61 69 74 56 6f | 69 63 65 20 28 24 73 70 |DoWaitVo|ice ($sp|
|00003ce0| 65 65 63 68 72 65 66 29 | 0d 20 20 20 20 20 20 0d |eechref)|. .|
|00003cf0| 20 20 20 20 20 20 24 65 | 72 72 3a 3d 53 50 20 56 | $e|rr:=SP V|
|00003d00| 6f 69 63 65 20 53 74 72 | 69 6e 67 20 28 24 73 70 |oice Str|ing ($sp|
|00003d10| 65 65 63 68 72 65 66 3b | 22 52 65 6e 8e 22 29 0d |eechref;|"Ren.").|
|00003d20| 20 20 20 20 20 20 44 6f | 45 72 72 6f 72 20 28 24 | Do|Error ($|
|00003d30| 65 72 72 3b 22 22 29 0d | 20 20 20 20 20 20 44 6f |err;"").| Do|
|00003d40| 57 61 69 74 56 6f 69 63 | 65 20 28 24 73 70 65 65 |WaitVoic|e ($spee|
|00003d50| 63 68 72 65 66 29 0d 20 | 20 20 20 20 20 0d 20 20 |chref). | . |
|00003d60| 20 20 20 20 24 65 72 72 | 3a 3d 53 50 20 56 6f 69 | $err|:=SP Voi|
|00003d70| 63 65 20 53 74 72 69 6e | 67 20 28 24 73 70 65 65 |ce Strin|g ($spee|
|00003d80| 63 68 72 65 66 3b 22 52 | 65 6e 8e 22 29 0d 20 20 |chref;"R|en."). |
|00003d90| 20 20 20 20 44 6f 45 72 | 72 6f 72 20 28 24 65 72 | DoEr|ror ($er|
|00003da0| 72 3b 22 22 29 0d 20 20 | 20 20 20 20 60 75 6e 6c |r;""). | `unl|
|00003db0| 65 73 73 20 79 6f 75 20 | 68 61 76 65 20 61 20 66 |ess you |have a f|
|00003dc0| 61 73 74 20 63 6f 6d 70 | 75 74 65 72 20 61 6e 79 |ast comp|uter any|
|00003dd0| 20 6e 6f 6e 2d 50 6c 61 | 69 6e 54 61 6c 6b 20 76 | non-Pla|inTalk v|
|00003de0| 6f 69 63 65 0d 20 20 20 | 20 20 20 60 69 73 20 70 |oice. | `is p|
|00003df0| 72 6f 62 61 62 6c 79 20 | 61 6c 72 65 61 64 79 20 |robably |already |
|00003e00| 66 69 6e 69 73 68 65 64 | 0d 20 20 20 20 20 20 24 |finished|. $|
|00003e10| 65 72 72 3a 3d 53 50 20 | 56 6f 69 63 65 20 50 61 |err:=SP |Voice Pa|
|00003e20| 75 73 65 20 28 24 73 70 | 65 65 63 68 72 65 66 29 |use ($sp|eechref)|
|00003e30| 0d 20 20 20 20 20 20 44 | 6f 45 72 72 6f 72 20 28 |. D|oError (|
|00003e40| 24 65 72 72 3b 22 22 29 | 0d 20 20 20 20 20 20 41 |$err;"")|. A|
|00003e50| 4c 45 52 54 28 22 4e 6f | 77 20 73 70 65 61 6b 69 |LERT("No|w speaki|
|00003e60| 6e 67 20 77 69 6c 6c 20 | 63 6f 6e 74 69 6e 75 65 |ng will |continue|
|00003e70| c9 22 29 0d 20 20 20 20 | 20 20 24 65 72 72 3a 3d |."). | $err:=|
|00003e80| 53 50 20 56 6f 69 63 65 | 20 43 6f 6e 74 20 28 24 |SP Voice| Cont ($|
|00003e90| 73 70 65 65 63 68 72 65 | 66 29 0d 20 20 20 20 20 |speechre|f). |
|00003ea0| 20 44 6f 45 72 72 6f 72 | 20 28 24 65 72 72 3b 22 | DoError| ($err;"|
|00003eb0| 22 29 0d 20 20 20 20 20 | 20 44 6f 57 61 69 74 56 |"). | DoWaitV|
|00003ec0| 6f 69 63 65 20 28 24 73 | 70 65 65 63 68 72 65 66 |oice ($s|peechref|
|00003ed0| 29 0d 20 20 20 20 20 20 | 0d 20 20 20 20 20 20 24 |). |. $|
|00003ee0| 65 72 72 3a 3d 53 50 20 | 56 6f 69 63 65 20 53 74 |err:=SP |Voice St|
|00003ef0| 72 69 6e 67 20 28 24 73 | 70 65 65 63 68 72 65 66 |ring ($s|peechref|
|00003f00| 3b 24 74 65 73 74 5f 73 | 74 72 29 0d 20 20 20 20 |;$test_s|tr). |
|00003f10| 20 20 44 6f 45 72 72 6f | 72 20 28 24 65 72 72 3b | DoErro|r ($err;|
|00003f20| 22 22 29 0d 20 20 20 20 | 20 20 44 6f 57 61 69 74 |""). | DoWait|
|00003f30| 56 6f 69 63 65 20 28 24 | 73 70 65 65 63 68 72 65 |Voice ($|speechre|
|00003f40| 66 29 0d 20 20 20 20 20 | 20 0d 20 20 20 20 20 20 |f). | . |
|00003f50| 24 65 72 72 3a 3d 53 50 | 20 56 6f 69 63 65 20 54 |$err:=SP| Voice T|
|00003f60| 65 78 74 20 28 24 73 70 | 65 65 63 68 72 65 66 3b |ext ($sp|eechref;|
|00003f70| 24 74 65 73 74 5f 74 78 | 74 3b 31 3b 31 3b 36 29 |$test_tx|t;1;1;6)|
|00003f80| 0d 20 20 20 20 20 20 49 | 66 20 28 24 65 72 72 3d |. I|f ($err=|
|00003f90| 30 29 0d 20 20 20 20 20 | 20 20 20 0d 20 20 20 20 |0). | . |
|00003fa0| 20 20 20 20 49 66 20 28 | 53 50 20 56 6f 69 63 65 | If (|SP Voice|
|00003fb0| 20 62 75 73 79 20 28 24 | 73 70 65 65 63 68 72 65 | busy ($|speechre|
|00003fc0| 66 29 3d 32 29 0d 20 20 | 20 20 20 20 20 20 20 20 |f)=2). | |
|00003fd0| 24 65 72 72 3a 3d 53 50 | 20 56 6f 69 63 65 20 43 |$err:=SP| Voice C|
|00003fe0| 6f 6e 74 20 28 24 73 70 | 65 65 63 68 72 65 66 29 |ont ($sp|eechref)|
|00003ff0| 0d 20 20 20 20 20 20 20 | 20 20 20 44 6f 45 72 72 |. | DoErr|
|00004000| 6f 72 20 28 24 65 72 72 | 3b 22 22 29 0d 20 20 20 |or ($err|;""). |
|00004010| 20 20 20 20 20 45 6c 73 | 65 20 0d 20 20 20 20 20 | Els|e . |
|00004020| 20 20 20 20 20 44 6f 45 | 72 72 6f 72 20 28 32 3b | DoE|rror (2;|
|00004030| 22 53 70 65 65 63 68 20 | 73 68 6f 75 6c 64 20 62 |"Speech |should b|
|00004040| 65 20 70 61 75 73 65 64 | 2e 22 29 0d 20 20 20 20 |e paused|."). |
|00004050| 20 20 20 20 45 6e 64 20 | 69 66 20 0d 20 20 20 20 | End |if . |
|00004060| 20 20 20 20 0d 20 20 20 | 20 20 20 45 6c 73 65 20 | . | Else |
|00004070| 0d 20 20 20 20 20 20 20 | 20 44 6f 45 72 72 6f 72 |. | DoError|
|00004080| 20 28 24 65 72 72 3b 22 | 22 29 0d 20 20 20 20 20 | ($err;"|"). |
|00004090| 20 45 6e 64 20 69 66 20 | 0d 20 20 20 20 20 20 0d | End if |. .|
|000040a0| 20 20 20 20 20 20 24 65 | 72 72 3a 3d 53 50 20 56 | $e|rr:=SP V|
|000040b0| 6f 69 63 65 20 54 65 78 | 74 20 28 24 73 70 65 65 |oice Tex|t ($spee|
|000040c0| 63 68 72 65 66 3b 24 74 | 65 73 74 5f 74 78 74 3b |chref;$t|est_txt;|
|000040d0| 31 3b 36 3b 30 29 0d 20 | 20 20 20 20 20 44 6f 57 |1;6;0). | DoW|
|000040e0| 61 69 74 56 6f 69 63 65 | 20 28 24 73 70 65 65 63 |aitVoice| ($speec|
|000040f0| 68 72 65 66 29 0d 20 20 | 20 20 20 20 43 61 73 65 |href). | Case|
|00004100| 20 6f 66 20 0d 20 20 20 | 20 20 20 20 20 3a 20 28 | of . | : (|
|00004110| 24 65 72 72 3d 30 29 0d | 20 20 20 20 20 20 20 20 |$err=0).| |
|00004120| 20 20 44 6f 45 72 72 6f | 72 20 28 2d 32 34 32 3b | DoErro|r (-242;|
|00004130| 22 53 68 6f 75 6c 64 20 | 72 65 74 75 72 6e 20 61 |"Should |return a|
|00004140| 6e 20 65 72 72 6f 72 20 | 68 65 72 65 c9 22 29 0d |n error |here.").|
|00004150| 20 20 20 20 20 20 20 20 | 3a 20 28 24 65 72 72 3d | |: ($err=|
|00004160| 2d 32 34 32 29 0d 20 20 | 20 20 20 20 20 20 20 20 |-242). | |
|00004170| 60 6e 6f 74 68 69 6e 67 | 20 20 20 20 20 20 20 20 |`nothing| |
|00004180| 20 20 0d 20 20 20 20 20 | 20 20 20 45 6c 73 65 20 | . | Else |
|00004190| 0d 20 20 20 20 20 20 20 | 20 20 20 44 6f 45 72 72 |. | DoErr|
|000041a0| 6f 72 20 28 24 65 72 72 | 3b 22 22 29 0d 20 20 20 |or ($err|;""). |
|000041b0| 20 20 20 45 6e 64 20 63 | 61 73 65 20 0d 20 20 20 | End c|ase . |
|000041c0| 20 20 20 0d 20 20 20 20 | 20 20 24 65 72 72 3a 3d | . | $err:=|
|000041d0| 53 50 20 56 6f 69 63 65 | 20 63 6f 64 65 20 28 24 |SP Voice| code ($|
|000041e0| 73 70 65 65 63 68 72 65 | 66 3b 24 74 65 73 74 5f |speechre|f;$test_|
|000041f0| 73 74 72 3b 24 70 68 6f | 6e 65 6d 65 3b 30 29 0d |str;$pho|neme;0).|
|00004200| 20 20 20 20 20 20 49 66 | 20 28 24 65 72 72 3c 30 | If| ($err<0|
|00004210| 29 0d 20 20 20 20 20 20 | 20 20 44 6f 45 72 72 6f |). | DoErro|
|00004220| 72 20 28 24 65 72 72 3b | 22 22 29 0d 20 20 20 20 |r ($err;|""). |
|00004230| 20 20 45 6c 73 65 20 0d | 20 20 20 20 20 20 20 20 | Else .| |
|00004240| 41 4c 45 52 54 28 22 53 | 74 72 69 6e 67 20 22 2b |ALERT("S|tring "+|
|00004250| 43 68 61 72 28 33 34 29 | 2b 24 74 65 73 74 5f 73 |Char(34)|+$test_s|
|00004260| 74 72 2b 43 68 61 72 28 | 33 34 29 2b 22 20 69 73 |tr+Char(|34)+" is|
|00004270| 20 63 6f 6e 76 65 72 74 | 65 64 20 74 6f 3a 22 2b | convert|ed to:"+|
|00004280| 43 68 61 72 28 31 33 29 | 2b 24 70 68 6f 6e 65 6d |Char(13)|+$phonem|
|00004290| 65 29 0d 20 20 20 20 20 | 20 45 6e 64 20 69 66 20 |e). | End if |
|000042a0| 0d 20 20 20 20 20 20 0d | 20 20 20 20 20 20 24 65 |. .| $e|
|000042b0| 72 72 3a 3d 53 50 20 56 | 6f 69 63 65 20 63 6f 64 |rr:=SP V|oice cod|
|000042c0| 65 20 28 24 73 70 65 65 | 63 68 72 65 66 3b 24 74 |e ($spee|chref;$t|
|000042d0| 65 73 74 5f 73 74 72 3b | 24 70 68 6f 6e 65 6d 65 |est_str;|$phoneme|
|000042e0| 3b 31 29 0d 20 20 20 20 | 20 20 49 66 20 28 24 65 |;1). | If ($e|
|000042f0| 72 72 3c 30 29 0d 20 20 | 20 20 20 20 20 20 44 6f |rr<0). | Do|
|00004300| 45 72 72 6f 72 20 28 24 | 65 72 72 3b 22 22 29 0d |Error ($|err;"").|
|00004310| 20 20 20 20 20 20 45 6c | 73 65 20 0d 20 20 20 20 | El|se . |
|00004320| 20 20 20 20 41 4c 45 52 | 54 28 22 53 74 72 69 6e | ALER|T("Strin|
|00004330| 67 20 22 2b 43 68 61 72 | 28 33 34 29 2b 24 74 65 |g "+Char|(34)+$te|
|00004340| 73 74 5f 73 74 72 2b 43 | 68 61 72 28 33 34 29 2b |st_str+C|har(34)+|
|00004350| 22 20 69 73 20 63 6f 6e | 76 65 72 74 65 64 20 74 |" is con|verted t|
|00004360| 6f 3a 22 2b 43 68 61 72 | 28 31 33 29 2b 24 70 68 |o:"+Char|(13)+$ph|
|00004370| 6f 6e 65 6d 65 29 0d 20 | 20 20 20 20 20 45 6e 64 |oneme). | End|
|00004380| 20 69 66 20 0d 20 20 20 | 20 20 20 0d 20 20 20 20 | if . | . |
|00004390| 20 20 60 73 74 6f 72 65 | 20 38 2d 62 69 74 20 73 | `store| 8-bit s|
|000043a0| 6f 75 6e 64 20 64 61 74 | 61 20 61 73 20 72 65 73 |ound dat|a as res|
|000043b0| 6f 75 72 63 65 20 69 6e | 20 34 44 20 66 69 6c 65 |ource in| 4D file|
|000043c0| 0d 20 20 20 20 20 20 24 | 65 72 72 3a 3d 53 50 20 |. $|err:=SP |
|000043d0| 56 6f 69 63 65 20 73 6f | 75 6e 64 20 28 24 73 70 |Voice so|und ($sp|
|000043e0| 65 65 63 68 72 65 66 3b | 24 74 65 73 74 5f 73 74 |eechref;|$test_st|
|000043f0| 72 3b 24 76 6f 69 63 65 | 6e 61 6d 65 2b 22 2e 52 |r;$voice|name+".R|
|00004400| 45 53 38 2d 30 22 3b 22 | 4e 4f 4e 45 22 3b 34 29 |ES8-0";"|NONE";4)|
|00004410| 0d 20 20 20 20 20 20 49 | 66 20 28 24 63 72 65 61 |. I|f ($crea|
|00004420| 74 6f 72 23 22 67 61 6c | 61 22 29 26 28 24 65 72 |tor#"gal|a")&($er|
|00004430| 72 3d 30 29 0d 20 20 20 | 20 20 20 20 20 44 6f 45 |r=0). | DoE|
|00004440| 72 72 6f 72 20 28 2d 32 | 33 31 3b 22 53 68 6f 75 |rror (-2|31;"Shou|
|00004450| 6c 64 20 72 65 74 75 72 | 6e 20 65 72 72 6f 72 20 |ld retur|n error |
|00004460| 62 65 63 61 75 73 65 20 | 6e 6f 74 20 61 20 50 6c |because |not a Pl|
|00004470| 61 69 6e 54 61 6c 6b 20 | 76 6f 69 63 65 2e 22 29 |ainTalk |voice.")|
|00004480| 0d 20 20 20 20 20 20 45 | 6c 73 65 20 0d 20 20 20 |. E|lse . |
|00004490| 20 20 20 20 20 49 66 20 | 28 24 65 72 72 23 2d 32 | If |($err#-2|
|000044a0| 33 31 29 0d 20 20 20 20 | 20 20 20 20 20 20 50 4c |31). | PL|
|000044b0| 41 59 28 24 76 6f 69 63 | 65 6e 61 6d 65 2b 22 2e |AY($voic|ename+".|
|000044c0| 52 45 53 38 2d 30 22 29 | 0d 20 20 20 20 20 20 20 |RES8-0")|. |
|000044d0| 20 20 20 44 6f 45 72 72 | 6f 72 20 28 24 65 72 72 | DoErr|or ($err|
|000044e0| 3b 22 22 29 0d 20 20 20 | 20 20 20 20 20 45 6e 64 |;""). | End|
|000044f0| 20 69 66 20 0d 20 20 20 | 20 20 20 45 6e 64 20 69 | if . | End i|
|00004500| 66 20 0d 20 20 20 20 20 | 20 0d 20 20 20 20 20 20 |f . | . |
|00004510| 60 73 74 6f 72 65 20 38 | 2d 62 69 74 20 73 6f 75 |`store 8|-bit sou|
|00004520| 6e 64 20 64 61 74 61 20 | 61 73 20 72 65 73 6f 75 |nd data |as resou|
|00004530| 72 63 65 20 69 6e 20 34 | 44 20 66 69 6c 65 0d 20 |rce in 4|D file. |
|00004540| 20 20 20 20 20 60 77 69 | 74 68 20 33 3a 31 20 63 | `wi|th 3:1 c|
|00004550| 6f 6d 70 72 65 73 73 69 | 6f 6e 0d 20 20 20 20 20 |ompressi|on. |
|00004560| 20 24 65 72 72 3a 3d 53 | 50 20 56 6f 69 63 65 20 | $err:=S|P Voice |
|00004570| 73 6f 75 6e 64 20 28 24 | 73 70 65 65 63 68 72 65 |sound ($|speechre|
|00004580| 66 3b 24 74 65 73 74 5f | 73 74 72 3b 24 76 6f 69 |f;$test_|str;$voi|
|00004590| 63 65 6e 61 6d 65 2b 22 | 2e 52 45 53 38 2d 33 22 |cename+"|.RES8-3"|
|000045a0| 3b 22 4d 41 43 33 22 3b | 34 29 0d 20 20 20 20 20 |;"MAC3";|4). |
|000045b0| 20 49 66 20 28 24 63 72 | 65 61 74 6f 72 23 22 67 | If ($cr|eator#"g|
|000045c0| 61 6c 61 22 29 26 28 24 | 65 72 72 3d 30 29 0d 20 |ala")&($|err=0). |
|000045d0| 20 20 20 20 20 20 20 44 | 6f 45 72 72 6f 72 20 28 | D|oError (|
|000045e0| 2d 32 33 31 3b 22 53 68 | 6f 75 6c 64 20 72 65 74 |-231;"Sh|ould ret|
|000045f0| 75 72 6e 20 65 72 72 6f | 72 20 62 65 63 61 75 73 |urn erro|r becaus|
|00004600| 65 20 6e 6f 74 20 61 20 | 50 6c 61 69 6e 54 61 6c |e not a |PlainTal|
|00004610| 6b 20 76 6f 69 63 65 2e | 22 29 0d 20 20 20 20 20 |k voice.|"). |
|00004620| 20 45 6c 73 65 20 0d 20 | 20 20 20 20 20 20 20 49 | Else . | I|
|00004630| 66 20 28 24 65 72 72 23 | 2d 32 33 31 29 0d 20 20 |f ($err#|-231). |
|00004640| 20 20 20 20 20 20 20 20 | 50 4c 41 59 28 24 76 6f | |PLAY($vo|
|00004650| 69 63 65 6e 61 6d 65 2b | 22 2e 52 45 53 38 2d 33 |icename+|".RES8-3|
|00004660| 22 29 0d 20 20 20 20 20 | 20 20 20 20 20 44 6f 45 |"). | DoE|
|00004670| 72 72 6f 72 20 28 24 65 | 72 72 3b 22 22 29 0d 20 |rror ($e|rr;""). |
|00004680| 20 20 20 20 20 20 20 45 | 6e 64 20 69 66 20 0d 20 | E|nd if . |
|00004690| 20 20 20 20 20 45 6e 64 | 20 69 66 20 0d 20 20 20 | End| if . |
|000046a0| 20 20 20 0d 20 20 20 20 | 20 20 60 73 74 6f 72 65 | . | `store|
|000046b0| 20 38 2d 62 69 74 20 73 | 6f 75 6e 64 20 64 61 74 | 8-bit s|ound dat|
|000046c0| 61 20 61 73 20 72 65 73 | 6f 75 72 63 65 20 69 6e |a as res|ource in|
|000046d0| 20 34 44 20 66 69 6c 65 | 0d 20 20 20 20 20 20 60 | 4D file|. `|
|000046e0| 77 69 74 68 20 36 3a 31 | 20 63 6f 6d 70 72 65 73 |with 6:1| compres|
|000046f0| 73 69 6f 6e 0d 20 20 20 | 20 20 20 24 65 72 72 3a |sion. | $err:|
|00004700| 3d 53 50 20 56 6f 69 63 | 65 20 73 6f 75 6e 64 20 |=SP Voic|e sound |
|00004710| 28 24 73 70 65 65 63 68 | 72 65 66 3b 24 74 65 73 |($speech|ref;$tes|
|00004720| 74 5f 73 74 72 3b 24 76 | 6f 69 63 65 6e 61 6d 65 |t_str;$v|oicename|
|00004730| 2b 22 2e 52 45 53 38 2d | 36 22 3b 22 4d 41 43 36 |+".RES8-|6";"MAC6|
|00004740| 22 3b 34 29 0d 20 20 20 | 20 20 20 49 66 20 28 24 |";4). | If ($|
|00004750| 63 72 65 61 74 6f 72 23 | 22 67 61 6c 61 22 29 26 |creator#|"gala")&|
|00004760| 28 24 65 72 72 3d 30 29 | 0d 20 20 20 20 20 20 20 |($err=0)|. |
|00004770| 20 44 6f 45 72 72 6f 72 | 20 28 2d 32 33 31 3b 22 | DoError| (-231;"|
|00004780| 53 68 6f 75 6c 64 20 72 | 65 74 75 72 6e 20 65 72 |Should r|eturn er|
|00004790| 72 6f 72 20 62 65 63 61 | 75 73 65 20 6e 6f 74 20 |ror beca|use not |
|000047a0| 61 20 50 6c 61 69 6e 54 | 61 6c 6b 20 76 6f 69 63 |a PlainT|alk voic|
|000047b0| 65 2e 22 29 0d 20 20 20 | 20 20 20 45 6c 73 65 20 |e."). | Else |
|000047c0| 0d 20 20 20 20 20 20 20 | 20 49 66 20 28 24 65 72 |. | If ($er|
|000047d0| 72 23 2d 32 33 31 29 0d | 20 20 20 20 20 20 20 20 |r#-231).| |
|000047e0| 20 20 50 4c 41 59 28 24 | 76 6f 69 63 65 6e 61 6d | PLAY($|voicenam|
|000047f0| 65 2b 22 2e 52 45 53 38 | 2d 36 22 29 0d 20 20 20 |e+".RES8|-6"). |
|00004800| 20 20 20 20 20 20 20 44 | 6f 45 72 72 6f 72 20 28 | D|oError (|
|00004810| 24 65 72 72 3b 22 22 29 | 0d 20 20 20 20 20 20 20 |$err;"")|. |
|00004820| 20 45 6e 64 20 69 66 20 | 0d 20 20 20 20 20 20 45 | End if |. E|
|00004830| 6e 64 20 69 66 20 0d 20 | 20 20 20 20 20 0d 20 20 |nd if . | . |
|00004840| 20 20 20 20 60 73 74 6f | 72 65 20 31 36 2d 62 69 | `sto|re 16-bi|
|00004850| 74 20 73 6f 75 6e 64 20 | 64 61 74 61 20 61 73 20 |t sound |data as |
|00004860| 72 65 73 6f 75 72 63 65 | 20 69 6e 20 46 69 6e 64 |resource| in Find|
|00004870| 65 72 20 66 69 6c 65 0d | 20 20 20 20 20 20 24 65 |er file.| $e|
|00004880| 72 72 3a 3d 53 50 20 56 | 6f 69 63 65 20 73 6f 75 |rr:=SP V|oice sou|
|00004890| 6e 64 20 28 24 73 70 65 | 65 63 68 72 65 66 3b 24 |nd ($spe|echref;$|
|000048a0| 74 65 73 74 5f 73 74 72 | 3b 22 64 65 73 6b 3a 22 |test_str|;"desk:"|
|000048b0| 2b 24 76 6f 69 63 65 6e | 61 6d 65 2b 22 2e 46 4e |+$voicen|ame+".FN|
|000048c0| 44 52 31 36 22 3b 22 4e | 4f 4e 45 22 3b 37 29 0d |DR16";"N|ONE";7).|
|000048d0| 20 20 20 20 20 20 49 66 | 20 28 24 63 72 65 61 74 | If| ($creat|
|000048e0| 6f 72 23 22 67 61 6c 61 | 22 29 26 28 24 65 72 72 |or#"gala|")&($err|
|000048f0| 3d 30 29 0d 20 20 20 20 | 20 20 20 20 44 6f 45 72 |=0). | DoEr|
|00004900| 72 6f 72 20 28 2d 32 33 | 31 3b 22 53 68 6f 75 6c |ror (-23|1;"Shoul|
|00004910| 64 20 72 65 74 75 72 6e | 20 65 72 72 6f 72 20 62 |d return| error b|
|00004920| 65 63 61 75 73 65 20 6e | 6f 74 20 61 20 50 6c 61 |ecause n|ot a Pla|
|00004930| 69 6e 54 61 6c 6b 20 76 | 6f 69 63 65 2e 22 29 0d |inTalk v|oice.").|
|00004940| 20 20 20 20 20 20 45 6c | 73 65 20 0d 20 20 20 20 | El|se . |
|00004950| 20 20 20 20 49 66 20 28 | 24 65 72 72 23 2d 32 33 | If (|$err#-23|
|00004960| 31 29 0d 20 20 20 20 20 | 20 20 20 20 20 44 6f 45 |1). | DoE|
|00004970| 72 72 6f 72 20 28 24 65 | 72 72 3b 22 22 29 0d 20 |rror ($e|rr;""). |
|00004980| 20 20 20 20 20 20 20 45 | 6e 64 20 69 66 20 0d 20 | E|nd if . |
|00004990| 20 20 20 20 20 45 6e 64 | 20 69 66 20 0d 20 20 20 | End| if . |
|000049a0| 20 20 20 0d 20 20 20 20 | 20 20 60 74 65 73 74 20 | . | `test |
|000049b0| 67 65 74 20 61 6e 20 73 | 65 74 20 61 74 74 72 69 |get an s|et attri|
|000049c0| 62 75 74 65 73 20 61 6e | 64 20 72 65 73 65 74 20 |butes an|d reset |
|000049d0| 63 68 61 6e 6e 65 6c 0d | 20 20 20 20 20 20 24 65 |channel.| $e|
|000049e0| 72 72 3a 3d 53 50 20 47 | 65 74 20 41 74 74 72 20 |rr:=SP G|et Attr |
|000049f0| 28 24 73 70 65 65 63 68 | 72 65 66 3b 24 6f 72 67 |($speech|ref;$org|
|00004a00| 5f 72 61 74 65 3b 24 6f | 72 67 5f 70 69 74 63 68 |_rate;$o|rg_pitch|
|00004a10| 29 0d 20 20 20 20 20 20 | 44 6f 45 72 72 6f 72 20 |). |DoError |
|00004a20| 28 24 65 72 72 3b 22 22 | 29 0d 20 20 20 20 20 20 |($err;""|). |
|00004a30| 24 65 72 72 3a 3d 53 50 | 20 53 65 74 20 41 74 74 |$err:=SP| Set Att|
|00004a40| 72 20 28 24 73 70 65 65 | 63 68 72 65 66 3b 24 6f |r ($spee|chref;$o|
|00004a50| 72 67 5f 72 61 74 65 2d | 31 30 3b 24 6f 72 67 5f |rg_rate-|10;$org_|
|00004a60| 70 69 74 63 68 2d 32 35 | 29 0d 20 20 20 20 20 20 |pitch-25|). |
|00004a70| 44 6f 45 72 72 6f 72 20 | 28 24 65 72 72 3b 22 22 |DoError |($err;""|
|00004a80| 29 0d 20 20 20 20 20 20 | 60 74 68 65 20 72 61 74 |). |`the rat|
|00004a90| 65 20 61 6e 64 20 70 69 | 74 63 68 20 63 61 6e 20 |e and pi|tch can |
|00004aa0| 62 65 20 63 68 61 6e 67 | 65 64 20 62 79 20 73 79 |be chang|ed by sy|
|00004ab0| 6e 74 68 65 73 69 7a 65 | 72 20 74 6f 20 63 6f 72 |nthesize|r to cor|
|00004ac0| 72 65 63 74 20 76 61 6c | 75 65 73 0d 20 20 20 20 |rect val|ues. |
|00004ad0| 20 20 24 65 72 72 3a 3d | 53 50 20 47 65 74 20 41 | $err:=|SP Get A|
|00004ae0| 74 74 72 20 28 24 73 70 | 65 65 63 68 72 65 66 3b |ttr ($sp|eechref;|
|00004af0| 24 72 61 74 65 3b 24 70 | 69 74 63 68 29 0d 20 20 |$rate;$p|itch). |
|00004b00| 20 20 20 20 44 6f 45 72 | 72 6f 72 20 28 24 65 72 | DoEr|ror ($er|
|00004b10| 72 3b 22 22 29 0d 20 20 | 20 20 20 20 24 65 72 72 |r;""). | $err|
|00004b20| 3a 3d 53 50 20 56 6f 69 | 63 65 20 72 65 73 65 74 |:=SP Voi|ce reset|
|00004b30| 20 28 24 73 70 65 65 63 | 68 72 65 66 29 0d 20 20 | ($speec|href). |
|00004b40| 20 20 20 20 44 6f 45 72 | 72 6f 72 20 28 24 65 72 | DoEr|ror ($er|
|00004b50| 72 3b 22 22 29 0d 20 20 | 20 20 20 20 24 65 72 72 |r;""). | $err|
|00004b60| 3a 3d 53 50 20 47 65 74 | 20 41 74 74 72 20 28 24 |:=SP Get| Attr ($|
|00004b70| 73 70 65 65 63 68 72 65 | 66 3b 24 72 61 74 65 3b |speechre|f;$rate;|
|00004b80| 24 70 69 74 63 68 29 0d | 20 20 20 20 20 20 44 6f |$pitch).| Do|
|00004b90| 45 72 72 6f 72 20 28 24 | 65 72 72 3b 22 22 29 0d |Error ($|err;"").|
|00004ba0| 20 20 20 20 20 20 49 66 | 20 28 24 6f 72 67 5f 72 | If| ($org_r|
|00004bb0| 61 74 65 23 24 72 61 74 | 65 29 0d 20 20 20 20 20 |ate#$rat|e). |
|00004bc0| 20 20 20 24 65 72 72 3a | 3d 53 50 20 47 65 74 20 | $err:|=SP Get |
|00004bd0| 41 74 74 72 20 28 24 73 | 70 65 65 63 68 72 65 66 |Attr ($s|peechref|
|00004be0| 3b 24 72 61 74 65 3b 24 | 70 69 74 63 68 29 0d 20 |;$rate;$|pitch). |
|00004bf0| 20 20 20 20 20 20 20 44 | 6f 45 72 72 6f 72 20 28 | D|oError (|
|00004c00| 30 3b 22 52 61 74 65 20 | 61 66 74 65 72 20 72 65 |0;"Rate |after re|
|00004c10| 73 65 74 20 69 73 20 64 | 69 66 66 65 72 65 6e 74 |set is d|ifferent|
|00004c20| 20 66 72 6f 6d 20 6f 72 | 69 67 69 6e 61 6c 20 76 | from or|iginal v|
|00004c30| 61 6c 75 65 2e 22 29 0d | 20 20 20 20 20 20 45 6e |alue.").| En|
|00004c40| 64 20 69 66 20 0d 20 20 | 20 20 20 20 49 66 20 28 |d if . | If (|
|00004c50| 24 6f 72 67 5f 70 69 74 | 63 68 23 24 70 69 74 63 |$org_pit|ch#$pitc|
|00004c60| 68 29 0d 20 20 20 20 20 | 20 20 20 24 65 72 72 3a |h). | $err:|
|00004c70| 3d 53 50 20 47 65 74 20 | 41 74 74 72 20 28 24 73 |=SP Get |Attr ($s|
|00004c80| 70 65 65 63 68 72 65 66 | 3b 24 72 61 74 65 3b 24 |peechref|;$rate;$|
|00004c90| 70 69 74 63 68 29 0d 20 | 20 20 20 20 20 20 20 44 |pitch). | D|
|00004ca0| 6f 45 72 72 6f 72 20 28 | 30 3b 22 52 61 74 65 20 |oError (|0;"Rate |
|00004cb0| 61 66 74 65 72 20 72 65 | 73 65 74 20 69 73 20 64 |after re|set is d|
|00004cc0| 69 66 66 65 72 65 6e 74 | 20 66 72 6f 6d 20 6f 72 |ifferent| from or|
|00004cd0| 69 67 69 6e 61 6c 20 76 | 61 6c 75 65 2e 22 29 0d |iginal v|alue.").|
|00004ce0| 20 20 20 20 20 20 45 6e | 64 20 69 66 20 0d 20 20 | En|d if . |
|00004cf0| 20 20 20 20 0d 20 20 20 | 20 20 20 60 63 6c 6f 73 | . | `clos|
|00004d00| 65 20 74 68 69 73 65 20 | 76 6f 69 63 65 0d 20 20 |e thise |voice. |
|00004d10| 20 20 20 20 24 65 72 72 | 3a 3d 53 50 20 43 6c 6f | $err|:=SP Clo|
|00004d20| 73 65 20 56 6f 69 63 65 | 20 28 24 73 70 65 65 63 |se Voice| ($speec|
|00004d30| 68 72 65 66 29 0d 20 20 | 20 20 20 20 44 6f 45 72 |href). | DoEr|
|00004d40| 72 6f 72 20 28 24 65 72 | 72 3b 22 22 29 0d 20 20 |ror ($er|r;""). |
|00004d50| 20 20 45 6c 73 65 20 0d | 20 20 20 20 20 20 0d 20 | Else .| . |
|00004d60| 20 20 20 20 20 44 6f 45 | 72 72 6f 72 20 28 24 65 | DoE|rror ($e|
|00004d70| 72 72 3b 22 22 29 0d 20 | 20 20 20 20 20 0d 20 20 |rr;""). | . |
|00004d80| 20 20 20 20 49 66 20 28 | 24 73 70 65 65 63 68 72 | If (|$speechr|
|00004d90| 65 66 23 30 29 0d 20 20 | 20 20 20 20 20 20 44 6f |ef#0). | Do|
|00004da0| 45 72 72 6f 72 20 28 24 | 65 72 72 3b 22 72 65 66 |Error ($|err;"ref|
|00004db0| 65 72 65 6e 63 65 20 76 | 61 6c 75 65 20 69 73 6e |erence v|alue isn|
|00004dc0| 27 74 20 73 65 74 20 74 | 6f 20 7a 65 72 6f 2e 22 |'t set t|o zero."|
|00004dd0| 29 0d 20 20 20 20 20 20 | 45 6e 64 20 69 66 20 0d |). |End if .|
|00004de0| 20 20 20 20 20 20 0d 20 | 20 20 20 45 6e 64 20 69 | . | End i|
|00004df0| 66 20 0d 20 20 20 20 0d | 20 20 45 6e 64 20 66 6f |f . .| End fo|
|00004e00| 72 20 0d 20 20 0d 45 6c | 73 65 20 60 63 61 6e 20 |r . .El|se `can |
|00004e10| 6e 6f 74 20 73 70 65 61 | 6b 20 62 65 63 61 75 73 |not spea|k becaus|
|00004e20| 65 20 53 70 65 65 63 68 | 20 4d 67 72 20 6e 6f 74 |e Speech| Mgr not|
|00004e30| 20 70 72 65 73 65 6e 74 | 20 6f 72 20 53 70 65 65 | present| or Spee|
|00004e40| 63 68 20 50 61 63 6b 20 | 6e 6f 74 20 73 65 74 20 |ch Pack |not set |
|00004e50| 75 70 20 70 72 6f 70 65 | 72 6c 79 0d 20 20 0d 20 |up prope|rly. . |
|00004e60| 20 44 6f 45 72 72 6f 72 | 20 28 2d 34 3b 22 55 6e | DoError| (-4;"Un|
|00004e70| 61 62 6c 65 20 74 6f 20 | 75 73 65 20 53 70 65 65 |able to |use Spee|
|00004e80| 63 68 20 50 61 63 6b 2e | 22 29 0d 20 20 0d 45 6e |ch Pack.|"). .En|
|00004e90| 64 20 69 66 20 0d 0d 0d | 44 6f 45 72 72 6f 72 20 |d if ...|DoError |
|00004ea0| 70 72 6f 63 65 64 75 72 | 65 0d 49 66 20 28 24 31 |procedur|e.If ($1|
|00004eb0| 23 30 29 0d 20 20 49 66 | 20 28 24 32 3d 22 22 29 |#0). If| ($2="")|
|00004ec0| 0d 20 20 20 20 24 32 3a | 3d 22 53 6f 72 72 79 2c |. $2:|="Sorry,|
|00004ed0| 20 61 6e 20 65 72 72 6f | 72 20 6f 63 63 75 72 65 | an erro|r occure|
|00004ee0| 64 2e 22 0d 20 20 45 6e | 64 20 69 66 20 0d 20 20 |d.". En|d if . |
|00004ef0| 0d 20 20 41 4c 45 52 54 | 28 24 32 2b 53 74 72 69 |. ALERT|($2+Stri|
|00004f00| 6e 67 28 24 31 29 29 0d | 20 20 54 52 41 43 45 0d |ng($1)).| TRACE.|
|00004f10| 45 6e 64 20 69 66 20 0d | 0d 0d 44 6f 57 61 69 74 |End if .|..DoWait|
|00004f20| 56 6f 69 63 65 20 70 72 | 6f 63 65 64 75 72 65 0d |Voice pr|ocedure.|
|00004f30| 57 68 69 6c 65 20 28 53 | 50 20 56 6f 69 63 65 20 |While (S|P Voice |
|00004f40| 62 75 73 79 20 28 24 31 | 29 3d 31 29 0d 20 20 49 |busy ($1|)=1). I|
|00004f50| 44 4c 45 0d 45 6e 64 20 | 77 68 69 6c 65 20 0d 0d |DLE.End |while ..|
|00004f60| 0d 0d 00 00 13 19 53 70 | 65 61 6b 20 50 72 6f 63 |......Sp|eak Proc|
|00004f70| 65 64 75 72 65 0d 0d 60 | 70 72 6f 63 65 64 75 72 |edure..`|procedur|
|00004f80| 65 20 74 6f 20 73 70 65 | 61 6b 20 74 68 65 20 63 |e to spe|ak the c|
|00004f90| 6f 6e 74 65 6e 74 73 20 | 6f 66 20 65 76 65 72 79 |ontents |of every|
|00004fa0| 20 65 6e 74 65 72 61 62 | 6c 65 20 66 69 65 6c 64 | enterab|le field|
|00004fb0| 20 6f 6e 20 61 20 6c 61 | 79 6f 75 74 0d 60 77 72 | on a la|yout.`wr|
|00004fc0| 69 74 74 65 6e 20 62 79 | 20 52 65 6e 8e 20 47 2e |itten by| Ren. G.|
|00004fd0| 41 2e 20 52 6f 73 2c 20 | 61 75 74 68 6f 72 20 6f |A. Ros, |author o|
|00004fe0| 66 20 53 70 65 65 63 68 | 20 50 61 63 6b 20 65 78 |f Speech| Pack ex|
|00004ff0| 74 65 72 6e 61 6c 0d 60 | 64 61 74 65 3a 20 31 32 |ternal.`|date: 12|
|00005000| 20 4f 63 74 6f 62 65 72 | 20 31 39 39 33 0d 60 75 | October| 1993.`u|
|00005010| 73 65 20 77 69 74 68 20 | 53 70 65 65 63 68 20 50 |se with |Speech P|
|00005020| 61 63 6b 20 32 2e 31 20 | 6f 72 20 6c 61 74 65 72 |ack 2.1 |or later|
|00005030| 0d 60 6e 65 65 64 73 20 | 34 74 68 20 44 69 6d 65 |.`needs |4th Dime|
|00005040| 6e 73 69 6f 6e 20 32 2e | 31 20 6f 72 20 6c 61 74 |nsion 2.|1 or lat|
|00005050| 65 72 0d 0d 60 73 79 6e | 74 61 78 3a 0d 60 53 50 |er..`syn|tax:.`SP|
|00005060| 45 41 4b 28 70 6f 69 6e | 74 65 72 3b 73 65 6c 65 |EAK(poin|ter;sele|
|00005070| 63 74 6f 72 29 0d 60 77 | 68 65 72 65 3a 0d 60 70 |ctor).`w|here:.`p|
|00005080| 6f 69 6e 74 65 72 20 69 | 73 20 61 20 70 6f 69 6e |ointer i|s a poin|
|00005090| 74 65 72 20 74 6f 20 74 | 68 65 20 6f 62 6a 65 63 |ter to t|he objec|
|000050a0| 74 20 69 2e 65 2e 20 6f | 62 74 61 69 6e 65 64 20 |t i.e. o|btained |
|000050b0| 62 79 20 75 73 69 6e 67 | 20 4c 61 73 74 20 41 72 |by using| Last Ar|
|000050c0| 65 61 0d 60 73 65 6c 65 | 63 74 6f 72 20 73 70 65 |ea.`sele|ctor spe|
|000050d0| 63 69 66 69 65 73 20 74 | 68 65 20 74 79 70 65 20 |cifies t|he type |
|000050e0| 6f 66 20 61 63 74 69 6f | 6e 20 75 6e 64 65 72 74 |of actio|n undert|
|000050f0| 61 6b 65 6e 0d 60 30 20 | 3d 20 6e 6f 6e 2c 20 72 |aken.`0 |= non, r|
|00005100| 65 64 72 61 77 20 62 75 | 74 74 6f 6e 73 20 6f 6e |edraw bu|ttons on|
|00005110| 6c 79 0d 60 31 20 3d 20 | 70 6c 61 79 0d 60 32 20 |ly.`1 = |play.`2 |
|00005120| 3d 20 73 74 6f 70 0d 60 | 33 20 3d 20 70 61 75 73 |= stop.`|3 = paus|
|00005130| 65 0d 60 66 6f 72 20 74 | 68 65 20 63 6f 6d 70 69 |e.`for t|he compi|
|00005140| 6c 65 72 20 70 75 74 20 | 74 68 69 73 20 73 6f 6d |ler put |this som|
|00005150| 65 77 68 65 72 65 20 65 | 6c 73 65 3a 0d 60 43 5f |ewhere e|lse:.`C_|
|00005160| 50 4f 49 4e 54 45 52 28 | 22 53 50 45 41 4b 22 3b |POINTER(|"SPEAK";|
|00005170| 24 31 29 0d 60 43 5f 49 | 4e 54 45 47 45 52 28 22 |$1).`C_I|NTEGER("|
|00005180| 53 50 45 41 4b 22 3b 24 | 32 29 0d 60 28 49 27 61 |SPEAK";$|2).`(I'a|
|00005190| 6d 20 49 20 63 6f 72 72 | 65 63 74 3f 20 49 20 64 |m I corr|ect? I d|
|000051a0| 6f 6e 27 74 20 75 73 65 | 20 74 68 65 20 63 6f 6d |on't use| the com|
|000051b0| 70 69 6c 65 72 20 61 6e | 64 20 6e 6f 20 76 33 20 |piler an|d no v3 |
|000051c0| 6d 61 6e 75 61 6c 73 20 | 61 76 61 69 6c 61 62 6c |manuals |availabl|
|000051d0| 65 29 0d 0d 60 74 68 69 | 73 20 70 72 6f 63 65 64 |e)..`thi|s proced|
|000051e0| 75 72 65 20 61 73 73 75 | 6d 65 73 3a 0d 60 2d 20 |ure assu|mes:.`- |
|000051f0| 69 6e 20 74 68 65 20 73 | 74 61 72 74 75 70 20 70 |in the s|tartup p|
|00005200| 72 6f 63 65 64 75 72 65 | 20 61 20 76 6f 69 63 65 |rocedure| a voice|
|00005210| 20 77 61 73 20 6f 70 65 | 6e 65 64 20 62 79 20 75 | was ope|ned by u|
|00005220| 73 69 6e 67 3a 0d 60 20 | 20 43 5f 49 4e 54 45 47 |sing:.` | C_INTEG|
|00005230| 45 52 28 24 65 72 72 3b | 53 70 65 65 63 68 52 65 |ER($err;|SpeechRe|
|00005240| 66 29 0d 60 20 20 24 65 | 72 72 20 3a 3d 20 53 50 |f).` $e|rr := SP|
|00005250| 20 56 6f 69 63 65 20 4f | 70 65 6e 28 22 2a 22 3b | Voice O|pen("*";|
|00005260| 53 70 65 65 63 68 52 65 | 66 29 0d 60 2d 20 74 68 |SpeechRe|f).`- th|
|00005270| 65 20 76 6f 69 63 65 20 | 77 69 6c 6c 20 62 65 20 |e voice |will be |
|00005280| 63 6c 6f 73 65 64 20 70 | 72 6f 70 65 72 6c 79 20 |closed p|roperly |
|00005290| 69 6e 20 61 6e 79 20 71 | 75 69 74 20 70 72 6f 63 |in any q|uit proc|
|000052a0| 65 64 75 72 65 3a 0d 60 | 20 20 24 65 72 72 20 3a |edure:.`| $err :|
|000052b0| 3d 20 53 50 20 56 6f 69 | 63 65 20 43 6c 6f 73 65 |= SP Voi|ce Close|
|000052c0| 28 53 70 65 65 63 68 52 | 65 66 29 0d 60 20 20 28 |(SpeechR|ef).` (|
|000052d0| 34 44 20 76 33 20 55 53 | 45 52 53 20 43 41 4e 20 |4D v3 US|ERS CAN |
|000052e0| 4d 41 4b 45 20 53 70 65 | 65 63 68 52 65 66 20 41 |MAKE Spe|echRef A|
|000052f0| 20 49 4e 54 45 52 50 52 | 4f 43 45 53 53 20 56 41 | INTERPR|OCESS VA|
|00005300| 52 49 41 42 4c 45 29 0d | 0d 60 74 68 65 20 64 65 |RIABLE).|.`the de|
|00005310| 73 69 67 6e 65 72 20 63 | 61 6e 20 63 61 6c 6c 20 |signer c|an call |
|00005320| 74 68 69 73 20 70 72 6f | 63 65 64 75 72 65 20 65 |this pro|cedure e|
|00005330| 69 74 68 65 72 20 62 79 | 20 6d 65 6e 75 20 70 72 |ither by| menu pr|
|00005340| 6f 63 65 64 75 72 65 73 | 20 6f 72 20 62 75 74 74 |ocedures| or butt|
|00005350| 6f 6e 73 2e 0d 60 74 68 | 69 73 20 70 72 6f 63 65 |ons..`th|is proce|
|00005360| 64 75 72 65 20 61 73 73 | 75 6d 65 73 20 79 6f 75 |dure ass|umes you|
|00005370| 20 61 72 65 20 75 73 69 | 6e 67 20 61 74 20 6c 65 | are usi|ng at le|
|00005380| 61 73 74 20 74 68 72 65 | 65 20 62 75 74 74 6f 6e |ast thre|e button|
|00005390| 73 20 77 69 74 68 20 74 | 68 65 73 65 20 6e 61 6d |s with t|hese nam|
|000053a0| 65 73 0d 60 61 6e 64 20 | 6f 6e 6c 79 20 6f 6e 65 |es.`and |only one|
|000053b0| 20 6c 69 6e 65 20 69 6e | 20 74 68 65 69 72 20 73 | line in| their s|
|000053c0| 63 72 69 70 74 0d 60 53 | 70 65 65 63 68 50 6c 61 |cript.`S|peechPla|
|000053d0| 79 0d 60 20 20 53 50 45 | 41 4b 28 4c 61 73 74 20 |y.` SPE|AK(Last |
|000053e0| 41 72 65 61 3b 31 29 0d | 60 53 70 65 65 63 68 53 |Area;1).|`SpeechS|
|000053f0| 74 6f 70 0d 60 20 20 53 | 50 45 41 4b 28 4c 61 73 |top.` S|PEAK(Las|
|00005400| 74 20 41 72 65 61 3b 32 | 29 0d 60 53 70 65 65 63 |t Area;2|).`Speec|
|00005410| 68 50 61 75 73 65 0d 60 | 20 20 53 50 45 41 4b 28 |hPause.`| SPEAK(|
|00005420| 4c 61 73 74 20 41 72 65 | 61 3b 32 29 0d 60 6f 66 |Last Are|a;2).`of|
|00005430| 20 77 68 69 63 68 20 27 | 53 43 52 49 50 54 3a 20 | which '|SCRIPT: |
|00005440| 4f 6e 6c 79 20 69 66 20 | 6d 6f 64 69 66 69 65 64 |Only if |modified|
|00005450| 27 20 69 73 20 65 6e 61 | 62 6c 65 64 0d 60 42 54 |' is ena|bled.`BT|
|00005460| 57 20 27 4c 61 73 74 20 | 41 72 65 61 27 20 63 61 |W 'Last |Area' ca|
|00005470| 6e 20 62 65 20 65 76 65 | 72 79 20 6f 74 68 65 72 |n be eve|ry other|
|00005480| 20 70 6f 69 6e 74 65 72 | 20 6f 66 63 6f 75 72 73 | pointer| ofcours|
|00005490| 65 0d 60 69 66 20 79 6f | 75 20 77 61 6e 74 20 74 |e.`if yo|u want t|
|000054a0| 6f 20 61 6c 6c 6f 77 20 | 6f 6e 6c 79 20 74 6f 20 |o allow |only to |
|000054b0| 73 70 65 61 6b 20 61 20 | 74 65 78 74 20 66 69 65 |speak a |text fie|
|000054c0| 6c 64 20 75 73 65 20 61 | 20 70 6f 69 6e 74 65 72 |ld use a| pointer|
|000054d0| 20 74 6f 20 74 68 61 74 | 20 66 69 65 6c 64 0d 0d | to that| field..|
|000054e0| 60 66 72 6f 6d 20 74 68 | 65 20 6c 61 79 6f 75 74 |`from th|e layout|
|000054f0| 20 70 72 6f 63 65 64 75 | 72 65 20 79 6f 75 20 63 | procedu|re you c|
|00005500| 61 6e 20 63 61 6c 6c 3a | 0d 60 20 20 53 50 45 41 |an call:|.` SPEA|
|00005510| 4b 28 4c 61 73 74 20 41 | 72 65 61 3b 30 29 0d 60 |K(Last A|rea;0).`|
|00005520| 74 6f 20 72 65 73 65 74 | 20 74 68 65 20 62 75 74 |to reset| the but|
|00005530| 74 6f 6e 20 73 74 61 74 | 65 20 63 6f 72 72 65 63 |ton stat|e correc|
|00005540| 74 6c 79 0d 60 28 69 6e | 20 74 68 69 73 20 63 61 |tly.`(in| this ca|
|00005550| 73 65 20 74 68 65 20 70 | 6f 69 6e 74 65 72 20 69 |se the p|ointer i|
|00005560| 73 20 69 67 6e 6f 72 65 | 64 29 0d 0d 43 5f 49 4e |s ignore|d)..C_IN|
|00005570| 54 45 47 45 52 28 24 65 | 72 72 3b 24 66 69 72 73 |TEGER($e|rr;$firs|
|00005580| 74 3b 24 6c 61 73 74 29 | 0d 43 5f 53 54 52 49 4e |t;$last)|.C_STRIN|
|00005590| 47 28 32 35 35 3b 24 73 | 70 65 61 6b 73 74 72 69 |G(255;$s|peakstri|
|000055a0| 6e 67 29 0d 0d 49 66 20 | 28 4e 6f 74 28 4e 69 6c |ng)..If |(Not(Nil|
|000055b0| 28 24 31 29 29 29 60 69 | 66 20 70 61 72 61 6d 65 |($1)))`i|f parame|
|000055c0| 74 65 72 20 69 73 20 76 | 61 6c 69 64 20 70 6f 69 |ter is v|alid poi|
|000055d0| 6e 74 65 72 0d 20 20 49 | 66 20 28 53 50 20 43 61 |nter. I|f (SP Ca|
|000055e0| 6e 20 73 70 65 61 6b 20 | 3e 30 29 60 69 66 20 77 |n speak |>0)`if w|
|000055f0| 65 20 63 61 6e 20 73 70 | 65 61 6b 20 64 6f 20 73 |e can sp|eak do s|
|00005600| 6f 20 61 6e 64 20 73 65 | 74 20 62 75 74 74 6f 6e |o and se|t button|
|00005610| 73 20 61 63 63 6f 72 64 | 69 6e 67 6c 79 0d 20 20 |s accord|ingly. |
|00005620| 20 20 43 61 73 65 20 6f | 66 20 0d 20 20 20 20 20 | Case o|f . |
|00005630| 20 3a 20 28 24 32 3d 31 | 29 60 70 6c 61 79 0d 20 | : ($2=1|)`play. |
|00005640| 20 20 20 20 20 20 20 49 | 66 20 28 53 50 20 56 6f | I|f (SP Vo|
|00005650| 69 63 65 20 62 75 73 79 | 20 28 53 70 65 65 63 68 |ice busy| (Speech|
|00005660| 52 65 66 29 3d 32 29 60 | 69 66 20 74 68 65 20 76 |Ref)=2)`|if the v|
|00005670| 6f 69 63 65 20 69 73 20 | 70 61 75 73 65 64 20 74 |oice is |paused t|
|00005680| 68 61 6e 20 74 68 69 73 | 20 73 65 6c 65 63 74 6f |han this| selecto|
|00005690| 72 20 61 63 74 73 20 61 | 73 20 27 63 6f 6e 74 69 |r acts a|s 'conti|
|000056a0| 6e 75 65 27 0d 20 20 20 | 20 20 20 20 20 20 20 24 |nue'. | $|
|000056b0| 65 72 72 3a 3d 53 50 20 | 56 6f 69 63 65 20 43 6f |err:=SP |Voice Co|
|000056c0| 6e 74 20 28 53 70 65 65 | 63 68 52 65 66 29 60 74 |nt (Spee|chRef)`t|
|000056d0| 68 75 73 3a 20 63 6f 6e | 74 69 6e 75 65 20 73 70 |hus: con|tinue sp|
|000056e0| 65 61 6b 69 6e 67 0d 20 | 20 20 20 20 20 20 20 20 |eaking. | |
|000056f0| 20 0d 20 20 20 20 20 20 | 20 20 45 6c 73 65 20 60 | . | Else `|
|00005700| 74 68 65 20 76 6f 69 63 | 65 20 69 73 20 6e 6f 74 |the voic|e is not|
|00005710| 20 70 61 75 73 65 64 20 | 73 6f 20 6a 75 73 74 20 | paused |so just |
|00005720| 73 70 65 61 6b 20 74 68 | 65 20 64 61 74 61 0d 20 |speak th|e data. |
|00005730| 20 20 20 20 20 20 20 20 | 20 49 66 20 28 54 79 70 | | If (Typ|
|00005740| 65 28 24 31 c8 29 3d 32 | 29 60 73 69 6e 63 65 20 |e($1.)=2|)`since |
|00005750| 61 20 74 65 78 74 20 66 | 69 65 6c 64 20 68 61 73 |a text f|ield has|
|00005760| 20 69 74 73 20 6f 77 6e | 20 53 70 65 65 63 68 20 | its own| Speech |
|00005770| 50 61 63 6b 20 63 6f 6d | 6d 61 6e 64 c9 0d 20 20 |Pack com|mand.. |
|00005780| 20 20 20 20 20 20 20 20 | 20 20 47 45 54 20 48 49 | | GET HI|
|00005790| 47 48 4c 49 47 48 54 28 | 24 31 c8 3b 24 66 69 72 |GHLIGHT(|$1.;$fir|
|000057a0| 73 74 3b 24 6c 61 73 74 | 29 60 67 65 74 20 74 68 |st;$last|)`get th|
|000057b0| 65 20 73 65 6c 65 63 74 | 69 6f 6e 20 6f 66 20 74 |e select|ion of t|
|000057c0| 68 65 20 74 65 78 74 0d | 20 20 20 20 20 20 20 20 |he text.| |
|000057d0| 20 20 20 20 24 65 72 72 | 3a 3d 53 50 20 56 6f 69 | $err|:=SP Voi|
|000057e0| 63 65 20 54 65 78 74 20 | 28 53 70 65 65 63 68 52 |ce Text |(SpeechR|
|000057f0| 65 66 3b 24 31 c8 3b 24 | 66 69 72 73 74 3b 24 6c |ef;$1.;$|first;$l|
|00005800| 61 73 74 3b 30 29 60 61 | 6e 64 20 73 61 79 20 69 |ast;0)`a|nd say i|
|00005810| 74 0d 20 20 20 20 20 20 | 20 20 20 20 45 6c 73 65 |t. | Else|
|00005820| 20 60 65 76 65 72 79 74 | 68 69 6e 67 20 65 6c 73 | `everyt|hing els|
|00005830| 65 20 62 75 74 20 61 20 | 74 65 78 74 20 66 69 65 |e but a |text fie|
|00005840| 6c 64 20 65 6e 64 73 20 | 68 65 72 65 0d 20 20 20 |ld ends |here. |
|00005850| 20 20 20 20 20 20 20 20 | 20 43 61 73 65 20 6f 66 | | Case of|
|00005860| 20 60 63 6f 6e 76 65 72 | 74 20 74 68 65 20 66 69 | `conver|t the fi|
|00005870| 65 6c 64 20 64 61 74 61 | 20 69 6e 74 6f 20 61 20 |eld data| into a |
|00005880| 73 74 72 69 6e 67 20 62 | 61 73 65 64 20 6f 6e 20 |string b|ased on |
|00005890| 74 68 65 20 64 61 74 61 | 20 74 79 70 65 0d 20 20 |the data| type. |
|000058a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 3a 20 28 54 | | : (T|
|000058b0| 79 70 65 28 24 31 c8 29 | 3d 30 29 60 6e 6f 72 6d |ype($1.)|=0)`norm|
|000058c0| 61 6c 20 73 74 72 69 6e | 67 0d 20 20 20 20 20 20 |al strin|g. |
|000058d0| 20 20 20 20 20 20 20 20 | 20 20 24 73 70 65 61 6b | | $speak|
|000058e0| 73 74 72 69 6e 67 3a 3d | 24 31 c8 60 6a 75 73 74 |string:=|$1.`just|
|000058f0| 20 63 6f 70 79 20 69 74 | 0d 20 20 20 20 20 20 20 | copy it|. |
|00005900| 20 20 20 20 20 20 20 3a | 20 28 54 79 70 65 28 24 | :| (Type($|
|00005910| 31 c8 29 3d 31 29 60 72 | 65 61 6c 0d 20 20 20 20 |1.)=1)`r|eal. |
|00005920| 20 20 20 20 20 20 20 20 | 20 20 20 20 24 73 70 65 | | $spe|
|00005930| 61 6b 73 74 72 69 6e 67 | 3a 3d 53 74 72 69 6e 67 |akstring|:=String|
|00005940| 28 24 31 c8 29 60 63 6f | 6e 76 65 72 74 20 75 73 |($1.)`co|nvert us|
|00005950| 69 6e 67 20 53 74 72 69 | 6e 67 0d 20 20 20 20 20 |ing Stri|ng. |
|00005960| 20 20 20 20 20 20 20 20 | 20 3a 20 28 54 79 70 65 | | : (Type|
|00005970| 28 24 31 c8 29 3d 34 29 | 60 64 61 74 65 0d 20 20 |($1.)=4)|`date. |
|00005980| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 24 73 | | $s|
|00005990| 70 65 61 6b 73 74 72 69 | 6e 67 3a 3d 53 74 72 69 |peakstri|ng:=Stri|
|000059a0| 6e 67 28 24 31 c8 3b 33 | 29 60 63 6f 6e 76 65 72 |ng($1.;3|)`conver|
|000059b0| 74 20 75 73 69 6e 67 20 | 53 74 72 69 6e 67 20 77 |t using |String w|
|000059c0| 69 74 68 20 74 68 65 20 | 6c 6f 6e 67 20 66 6f 72 |ith the |long for|
|000059d0| 6d 61 74 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |mat. | |
|000059e0| 20 20 3a 20 28 54 79 70 | 65 28 24 31 c8 29 3d 36 | : (Typ|e($1.)=6|
|000059f0| 29 60 62 6f 6f 6c 65 61 | 6e 0d 20 20 20 20 20 20 |)`boolea|n. |
|00005a00| 20 20 20 20 20 20 20 20 | 20 20 24 73 70 65 61 6b | | $speak|
|00005a10| 73 74 72 69 6e 67 3a 3d | 28 22 74 72 75 65 22 2a |string:=|("true"*|
|00005a20| 4e 75 6d 28 24 31 c8 29 | 29 2b 28 22 66 61 6c 73 |Num($1.)|)+("fals|
|00005a30| 65 22 2a 4e 75 6d 28 4e | 6f 74 28 24 31 c8 29 29 |e"*Num(N|ot($1.))|
|00005a40| 29 60 64 69 66 66 69 63 | 75 6c 74 20 77 68 61 74 |)`diffic|ult what|
|00005a50| 20 74 6f 20 73 61 79 2c | 20 73 69 6d 70 6c 65 20 | to say,| simple |
|00005a60| 54 52 55 45 20 6f 72 20 | 46 41 4c 53 45 20 49 20 |TRUE or |FALSE I |
|00005a70| 67 75 65 73 73 0d 20 20 | 20 20 20 20 20 20 20 20 |guess. | |
|00005a80| 20 20 20 20 3a 20 28 54 | 79 70 65 28 24 31 c8 29 | : (T|ype($1.)|
|00005a90| 3d 38 29 60 69 6e 74 65 | 67 65 72 0d 20 20 20 20 |=8)`inte|ger. |
|00005aa0| 20 20 20 20 20 20 20 20 | 20 20 20 20 24 73 70 65 | | $spe|
|00005ab0| 61 6b 73 74 72 69 6e 67 | 3a 3d 53 74 72 69 6e 67 |akstring|:=String|
|00005ac0| 28 24 31 c8 29 60 63 6f | 6e 76 65 72 74 20 75 73 |($1.)`co|nvert us|
|00005ad0| 69 6e 67 20 53 74 72 69 | 6e 67 0d 20 20 20 20 20 |ing Stri|ng. |
|00005ae0| 20 20 20 20 20 20 20 20 | 20 3a 20 28 54 79 70 65 | | : (Type|
|00005af0| 28 24 31 c8 29 3d 39 29 | 60 6c 6f 6e 67 20 69 6e |($1.)=9)|`long in|
|00005b00| 74 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |t. | |
|00005b10| 20 20 24 73 70 65 61 6b | 73 74 72 69 6e 67 3a 3d | $speak|string:=|
|00005b20| 53 74 72 69 6e 67 28 24 | 31 c8 29 60 63 6f 6e 76 |String($|1.)`conv|
|00005b30| 65 72 74 20 75 73 69 6e | 67 20 53 74 72 69 6e 67 |ert usin|g String|
|00005b40| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3a |. | :|
|00005b50| 20 28 54 79 70 65 28 24 | 31 c8 29 3d 31 31 29 60 | (Type($|1.)=11)`|
|00005b60| 74 69 6d 65 0d 20 20 20 | 20 20 20 20 20 20 20 20 |time. | |
|00005b70| 20 20 20 20 20 24 73 70 | 65 61 6b 73 74 72 69 6e | $sp|eakstrin|
|00005b80| 67 3a 3d 53 74 72 69 6e | 67 28 24 31 c8 3b 35 29 |g:=Strin|g($1.;5)|
|00005b90| 60 63 6f 6e 76 65 72 74 | 20 75 73 69 6e 67 20 53 |`convert| using S|
|00005ba0| 74 72 69 6e 67 20 77 69 | 74 68 20 74 68 65 20 68 |tring wi|th the h|
|00005bb0| 68 3a 6d 6d 20 41 4d 2f | 50 4d 20 66 6f 72 6d 61 |h:mm AM/|PM forma|
|00005bc0| 74 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |t. | |
|00005bd0| 45 6c 73 65 20 0d 20 20 | 20 20 20 20 20 20 20 20 |Else . | |
|00005be0| 20 20 20 20 20 20 24 73 | 70 65 61 6b 73 74 72 69 | $s|peakstri|
|00005bf0| 6e 67 3a 3d 22 22 60 61 | 6e 79 74 68 69 6e 67 20 |ng:=""`a|nything |
|00005c00| 65 6c 73 65 20 67 69 76 | 65 73 20 61 6e 20 65 6d |else giv|es an em|
|00005c10| 70 74 79 20 73 74 72 69 | 6e 67 0d 20 20 20 20 20 |pty stri|ng. |
|00005c20| 20 20 20 20 20 20 20 45 | 6e 64 20 63 61 73 65 20 | E|nd case |
|00005c30| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 0d 20 20 |. | . |
|00005c40| 20 20 20 20 20 20 20 20 | 20 20 49 66 20 28 24 73 | | If ($s|
|00005c50| 70 65 61 6b 73 74 72 69 | 6e 67 23 22 22 29 60 69 |peakstri|ng#"")`i|
|00005c60| 66 20 65 6d 70 74 79 20 | 64 6f 6e 27 74 20 74 72 |f empty |don't tr|
|00005c70| 79 20 69 74 2c 20 69 6e | 74 65 72 72 75 70 74 20 |y it, in|terrupt |
|00005c80| 70 72 65 76 69 6f 75 73 | 20 73 70 65 61 6b 69 6e |previous| speakin|
|00005c90| 67 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |g. | |
|00005ca0| 24 65 72 72 3a 3d 53 50 | 20 56 6f 69 63 65 20 53 |$err:=SP| Voice S|
|00005cb0| 74 72 69 6e 67 20 28 53 | 70 65 65 63 68 52 65 66 |tring (S|peechRef|
|00005cc0| 3b 24 73 70 65 61 6b 73 | 74 72 69 6e 67 29 60 73 |;$speaks|tring)`s|
|00005cd0| 61 79 20 69 74 21 0d 20 | 20 20 20 20 20 20 20 20 |ay it!. | |
|00005ce0| 20 20 20 45 6e 64 20 69 | 66 20 0d 20 20 20 20 20 | End i|f . |
|00005cf0| 20 20 20 20 20 20 20 0d | 20 20 20 20 20 20 20 20 | .| |
|00005d00| 20 20 45 6e 64 20 69 66 | 20 0d 20 20 20 20 20 20 | End if| . |
|00005d10| 20 20 20 20 0d 20 20 20 | 20 20 20 20 20 45 6e 64 | . | End|
|00005d20| 20 69 66 20 0d 20 20 20 | 20 20 20 20 20 0d 20 20 | if . | . |
|00005d30| 20 20 20 20 20 20 60 6d | 75 63 68 20 73 69 6d 70 | `m|uch simp|
|00005d40| 6c 65 72 20 6e 6f 77 3a | 20 28 77 65 27 72 65 20 |ler now:| (we're |
|00005d50| 61 72 65 20 73 74 69 6c | 6c 20 69 6e 20 74 68 65 |are stil|l in the|
|00005d60| 20 63 61 73 65 20 73 74 | 61 74 65 6d 65 6e 74 20 | case st|atement |
|00005d70| 66 6f 72 20 74 68 65 20 | 73 65 6c 65 63 74 6f 72 |for the |selector|
|00005d80| 21 29 0d 20 20 20 20 20 | 20 3a 20 28 24 32 3d 32 |!). | : ($2=2|
|00005d90| 29 60 73 74 6f 70 0d 20 | 20 20 20 20 20 20 20 24 |)`stop. | $|
|00005da0| 65 72 72 3a 3d 53 50 20 | 56 6f 69 63 65 20 53 74 |err:=SP |Voice St|
|00005db0| 6f 70 20 28 53 70 65 65 | 63 68 52 65 66 29 60 73 |op (Spee|chRef)`s|
|00005dc0| 74 6f 70 20 74 68 65 20 | 76 6f 69 63 65 20 28 74 |top the |voice (t|
|00005dd0| 65 73 74 69 6e 67 20 69 | 66 20 62 75 73 79 20 69 |esting i|f busy i|
|00005de0| 73 20 64 6f 6e 65 20 62 | 79 20 65 78 74 65 72 6e |s done b|y extern|
|00005df0| 61 6c 29 0d 20 20 20 20 | 20 20 3a 20 28 24 32 3d |al). | : ($2=|
|00005e00| 33 29 60 70 61 75 73 65 | 0d 20 20 20 20 20 20 20 |3)`pause|. |
|00005e10| 20 24 65 72 72 3a 3d 53 | 50 20 56 6f 69 63 65 20 | $err:=S|P Voice |
|00005e20| 50 61 75 73 65 20 28 53 | 70 65 65 63 68 52 65 66 |Pause (S|peechRef|
|00005e30| 29 60 70 61 75 73 65 20 | 74 68 65 20 76 6f 69 63 |)`pause |the voic|
|00005e40| 65 20 28 74 65 73 74 69 | 6e 67 20 69 66 20 62 75 |e (testi|ng if bu|
|00005e50| 73 79 20 69 73 20 64 6f | 6e 65 20 62 79 20 65 78 |sy is do|ne by ex|
|00005e60| 74 65 72 6e 61 6c 29 0d | 20 20 20 20 45 6e 64 20 |ternal).| End |
|00005e70| 63 61 73 65 20 0d 20 20 | 20 20 0d 20 20 20 20 60 |case . | . `|
|00005e80| 6e 6f 77 20 73 65 74 20 | 74 68 65 20 62 75 74 74 |now set |the butt|
|00005e90| 6f 6e 73 0d 20 20 20 20 | 24 73 74 61 74 75 73 3a |ons. |$status:|
|00005ea0| 3d 53 50 20 56 6f 69 63 | 65 20 62 75 73 79 20 28 |=SP Voic|e busy (|
|00005eb0| 53 70 65 65 63 68 52 65 | 66 29 60 74 68 65 20 6f |SpeechRe|f)`the o|
|00005ec0| 74 68 65 72 73 20 64 65 | 70 65 6e 64 20 6f 6e 20 |thers de|pend on |
|00005ed0| 74 68 65 20 73 74 61 74 | 65 20 6f 66 20 73 70 65 |the stat|e of spe|
|00005ee0| 61 6b 69 6e 67 0d 20 20 | 20 20 43 61 73 65 20 6f |aking. | Case o|
|00005ef0| 66 20 0d 20 20 20 20 20 | 20 3a 20 28 24 73 74 61 |f . | : ($sta|
|00005f00| 74 75 73 3d 30 29 60 69 | 64 6c 65 0d 20 20 20 20 |tus=0)`i|dle. |
|00005f10| 20 20 20 20 45 4e 41 42 | 4c 45 20 42 55 54 54 4f | ENAB|LE BUTTO|
|00005f20| 4e 28 53 70 65 65 63 68 | 50 6c 61 79 29 60 70 6c |N(Speech|Play)`pl|
|00005f30| 61 79 20 69 73 20 61 6c | 77 61 79 73 20 65 6e 61 |ay is al|ways ena|
|00005f40| 62 6c 65 64 20 0d 20 20 | 20 20 20 20 20 20 44 49 |bled . | DI|
|00005f50| 53 41 42 4c 45 20 42 55 | 54 54 4f 4e 28 53 70 65 |SABLE BU|TTON(Spe|
|00005f60| 65 63 68 53 74 6f 70 29 | 60 74 68 65 20 76 6f 69 |echStop)|`the voi|
|00005f70| 63 65 20 69 73 20 6e 6f | 74 20 61 63 74 69 76 65 |ce is no|t active|
|00005f80| 20 73 6f 20 64 69 73 61 | 62 6c 65 64 0d 20 20 20 | so disa|bled. |
|00005f90| 20 20 20 20 20 44 49 53 | 41 42 4c 45 20 42 55 54 | DIS|ABLE BUT|
|00005fa0| 54 4f 4e 28 53 70 65 65 | 63 68 50 61 75 73 65 29 |TON(Spee|chPause)|
|00005fb0| 0d 20 20 20 20 20 20 3a | 20 28 24 73 74 61 74 75 |. :| ($statu|
|00005fc0| 73 3d 31 29 60 62 75 73 | 79 0d 20 20 20 20 20 20 |s=1)`bus|y. |
|00005fd0| 20 20 45 4e 41 42 4c 45 | 20 42 55 54 54 4f 4e 28 | ENABLE| BUTTON(|
|00005fe0| 53 70 65 65 63 68 50 6c | 61 79 29 60 70 6c 61 79 |SpeechPl|ay)`play|
|00005ff0| 20 69 73 20 61 6c 77 61 | 79 73 20 65 6e 61 62 6c | is alwa|ys enabl|
|00006000| 65 64 20 0d 20 20 20 20 | 20 20 20 20 45 4e 41 42 |ed . | ENAB|
|00006010| 4c 45 20 42 55 54 54 4f | 4e 28 53 70 65 65 63 68 |LE BUTTO|N(Speech|
|00006020| 53 74 6f 70 29 60 75 73 | 65 72 20 63 61 6e 20 65 |Stop)`us|er can e|
|00006030| 69 74 68 65 72 20 73 74 | 6f 70 c9 0d 20 20 20 20 |ither st|op.. |
|00006040| 20 20 20 20 45 4e 41 42 | 4c 45 20 42 55 54 54 4f | ENAB|LE BUTTO|
|00006050| 4e 28 53 70 65 65 63 68 | 50 61 75 73 65 29 60 6f |N(Speech|Pause)`o|
|00006060| 72 20 70 61 75 73 65 0d | 20 20 20 20 20 20 3a 20 |r pause.| : |
|00006070| 28 24 73 74 61 74 75 73 | 3d 32 29 60 70 61 75 73 |($status|=2)`paus|
|00006080| 65 64 0d 20 20 20 20 20 | 20 20 20 45 4e 41 42 4c |ed. | ENABL|
|00006090| 45 20 42 55 54 54 4f 4e | 28 53 70 65 65 63 68 50 |E BUTTON|(SpeechP|
|000060a0| 6c 61 79 29 60 70 6c 61 | 79 20 69 73 20 61 6c 77 |lay)`pla|y is alw|
|000060b0| 61 79 73 20 65 6e 61 62 | 6c 65 64 20 0d 20 20 20 |ays enab|led . |
|000060c0| 20 20 20 20 20 45 4e 41 | 42 4c 45 20 42 55 54 54 | ENA|BLE BUTT|
|000060d0| 4f 4e 28 53 70 65 65 63 | 68 53 74 6f 70 29 60 75 |ON(Speec|hStop)`u|
|000060e0| 73 65 72 20 63 61 6e 20 | 73 74 6f 70 20 62 75 74 |ser can |stop but|
|000060f0| c9 0d 20 20 20 20 20 20 | 20 20 44 49 53 41 42 4c |.. | DISABL|
|00006100| 45 20 42 55 54 54 4f 4e | 28 53 70 65 65 63 68 50 |E BUTTON|(SpeechP|
|00006110| 61 75 73 65 29 60 76 6f | 69 63 65 20 70 61 75 73 |ause)`vo|ice paus|
|00006120| 65 64 20 61 6c 72 65 61 | 64 79 0d 20 20 20 20 20 |ed alrea|dy. |
|00006130| 20 45 6c 73 65 20 0d 20 | 20 20 20 20 20 20 20 44 | Else . | D|
|00006140| 49 53 41 42 4c 45 20 42 | 55 54 54 4f 4e 28 53 70 |ISABLE B|UTTON(Sp|
|00006150| 65 65 63 68 50 6c 61 79 | 29 60 74 68 65 20 76 6f |eechPlay|)`the vo|
|00006160| 69 63 65 20 69 73 20 6e | 6f 74 20 61 63 74 69 76 |ice is n|ot activ|
|00006170| 65 20 73 6f 20 64 69 73 | 61 62 6c 65 20 61 6c 6c |e so dis|able all|
|00006180| 0d 20 20 20 20 20 20 20 | 20 44 49 53 41 42 4c 45 |. | DISABLE|
|00006190| 20 42 55 54 54 4f 4e 28 | 53 70 65 65 63 68 53 74 | BUTTON(|SpeechSt|
|000061a0| 6f 70 29 0d 20 20 20 20 | 20 20 20 20 44 49 53 41 |op). | DISA|
|000061b0| 42 4c 45 20 42 55 54 54 | 4f 4e 28 53 70 65 65 63 |BLE BUTT|ON(Speec|
|000061c0| 68 50 61 75 73 65 29 0d | 20 20 20 20 45 6e 64 20 |hPause).| End |
|000061d0| 63 61 73 65 20 0d 20 20 | 20 20 0d 20 20 45 6c 73 |case . | . Els|
|000061e0| 65 20 0d 20 20 20 20 0d | 20 20 20 20 44 49 53 41 |e . .| DISA|
|000061f0| 42 4c 45 20 42 55 54 54 | 4f 4e 28 53 70 65 65 63 |BLE BUTT|ON(Speec|
|00006200| 68 50 6c 61 79 29 60 63 | 61 6e 27 74 20 73 70 65 |hPlay)`c|an't spe|
|00006210| 61 6b 20 73 6f 20 64 69 | 73 61 62 6c 65 20 62 75 |ak so di|sable bu|
|00006220| 74 74 6f 6e 73 0d 20 20 | 20 20 44 49 53 41 42 4c |ttons. | DISABL|
|00006230| 45 20 42 55 54 54 4f 4e | 28 53 70 65 65 63 68 53 |E BUTTON|(SpeechS|
|00006240| 74 6f 70 29 0d 20 20 20 | 20 44 49 53 41 42 4c 45 |top). | DISABLE|
|00006250| 20 42 55 54 54 4f 4e 28 | 53 70 65 65 63 68 50 61 | BUTTON(|SpeechPa|
|00006260| 75 73 65 29 0d 20 20 20 | 20 0d 20 20 45 6e 64 20 |use). | . End |
|00006270| 69 66 20 0d 45 6e 64 20 | 69 66 20 0d 0d 0d 0d 00 |if .End |if .....|
|00006280| 00 00 01 20 00 00 00 16 | 00 01 00 00 00 00 00 0c |... ....|........|
|00006290| 00 0a 00 03 00 00 00 09 | 00 00 00 00 00 00 00 00 |........|........|
|000062a0| 01 a0 00 48 03 32 36 32 | 05 31 32 38 34 34 05 31 |...H.262|.12844.1|
|000062b0| 38 34 34 38 05 31 38 37 | 37 34 05 31 34 37 37 30 |8448.187|74.14770|
|000062c0| 05 32 36 34 30 35 04 33 | 31 31 38 05 31 39 30 35 |.26405.3|118.1905|
|000062d0| 34 05 31 39 35 34 38 05 | 33 30 32 33 37 05 32 30 |4.19548.|30237.20|
|000062e0| 34 39 37 05 32 37 32 30 | 36 04 35 32 33 38 05 32 |497.2720|6.5238.2|
|000062f0| 38 37 37 38 05 31 36 30 | 38 37 05 31 35 34 39 34 |8778.160|87.15494|
|00006300| 05 31 30 33 37 32 05 31 | 32 35 38 35 05 31 37 34 |.10372.1|2585.174|
|00006310| 32 32 05 31 39 37 30 30 | 05 31 34 39 33 30 05 31 |22.19700|.14930.1|
|00006320| 35 35 37 35 05 31 31 37 | 30 33 05 32 39 39 38 31 |5575.117|03.29981|
|00006330| 05 32 38 38 30 35 05 32 | 36 38 38 34 05 31 39 37 |.28805.2|6884.197|
|00006340| 35 33 05 33 32 36 34 38 | 05 31 31 30 31 32 05 32 |53.32648|.11012.2|
|00006350| 36 36 30 38 05 32 37 33 | 32 32 04 35 30 35 30 05 |6608.273|22.5050.|
|00006360| 32 37 34 32 33 05 31 35 | 37 32 31 05 31 38 38 35 |27423.15|721.1885|
|00006370| 35 05 31 38 33 37 33 05 | 31 32 32 31 31 05 31 33 |5.18373.|12211.13|
|00006380| 39 30 35 05 31 36 35 37 | 37 05 31 39 34 33 39 05 |905.1657|7.19439.|
|00006390| 32 32 36 33 39 05 31 36 | 31 39 35 05 31 37 31 30 |22639.16|195.1710|
|000063a0| 34 05 31 33 35 35 39 05 | 31 38 38 39 38 05 33 30 |4.13559.|18898.30|
|000063b0| 34 35 31 05 31 31 36 39 | 30 05 31 39 39 36 39 05 |451.1169|0.19969.|
|000063c0| 32 38 37 30 33 05 32 30 | 34 35 32 05 33 31 30 33 |28703.20|452.3103|
|000063d0| 39 05 31 38 35 30 37 04 | 37 39 30 35 05 33 32 33 |9.18507.|7905.323|
|000063e0| 32 33 05 31 37 36 36 34 | 05 32 36 34 30 32 04 34 |23.17664|.26402.4|
|000063f0| 36 35 31 05 32 30 37 33 | 36 04 36 30 34 39 05 32 |651.2073|6.6049.2|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
